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‘ Les outils 
évoluent. 


Echapperez-vous 
aux TimeOut ? 


Les TimeOut sont des pro- 
grammes qui se greffent 
sur AppleWorks. Ils sont 
disponibles à tout instant, 
sans quitter AppleWorks, 
avec l'ergonomie Apple- 
Works. Pom's les a adapté 
(en exclusivité) à la version 
française 1.4 et livre des 
manuels de référence en 
français. 


Comment leur échapper ? 
Pas simple, car se passer du 
progrès, c'est un peu re- 
venir aux roues dentées. I] 
va falloir renoncer à des 
possibilités étonnantes : 


Rendre toutes les opérations 
automatiques, utiliser la souris 
partout dans AppleWorks avec 
TIMEOuT ULTRAMacros... Créer des 
menus à l'intérieur de macro- 
commandes et profiter de toutes 
les macros de MaAcroTooLs. 


Imprimer avec la qualité 
Macintosh sur une cinquantaine 
d'imprimantes à aiguilles grâce à 
TIMEOuT SuPERFoNTs et ses 47 po- 
lices de caractéres. 


imprimer les feuilles de calcul ‘à 
l'italienne’, en plusieurs tailles... 
TMEOUT SIDESPRFAD. 


Représenter instantanément les 
données du tableur sous forme de 
graphes avec TIME Our GRAPH 


TimeOuT PanrT, ce logiciel de 
dessin en double HGR, intégré à 
AppleWorks, avec ses menus 
déroulants. 


DEsxToozs I et ses accessoires, 
calculette, calepin, calendrier... 
même un crypteur defichier pour 
les documents confidentiels. 


Copier des fichiers, les comparer, 
les renommer, en changer le type 
etc., travailler sur les volumes, 
toujours sans quitter Apple- 
Works, c'est TmeOur FeMasrer. 


TmEOuT PowEerPacx l'ensemble 
d'applications intégrées pour 
trier des colonnes, créer trois bu- 
reaux (36 fichiers) et trois presse- 
papiers, laricer un autre pro- 
gramme et revenir à AppleWorks, 
charger les catalogues dans la 
base de données, classer le 
bureau, etc. 


Travailler plus efficacement sur le 
tableur ? Time Our SPREADT 00LS : 
se simplifier les Jlargeurs de 
colonnes, recopier des lignes 
dans des colonnes — ou l'inverse. 





Transformer les formules en 
valeurs, copier des blocs et lier des 
feuilles de calculs... 


Notes descriptives sur simple 
demande. Bon de comunande en fin 
de numéro. 
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TimeOut, 
le progrès 
simple 
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La Joconde est au Louvre et Macintosh données, de n'en garder que ce qui les Soudain un doute 
est partout. intéressent, d'y adjoindre des graphi-  m’effleure. S'il avait eu 
Là où les hommes ont besoin de ques simplement en cliquant. Et d’en- un Macintosh Vinci 
travailler sur des informations. Be voyer le résultat sans quitter leur aurait-il offert la Joconde 
consulter n'importe quelle banque de bureau. à François- I"? Apple 
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EXTRAFONTS 


DEUX APPLICATIONS, CoLorFoNTs 
ET EDIFONTS, QUI DONNERONT A 
VOTRE APPLE WORKS /TIMEOUT 
ENCORE PLUS DE SOUPLESSE ET DE 
PUISSANCE 


- ColorFonts donne à TimeOut SuperFonts la 
couleur. 

-  EdiFonts est un éditeur de polices qui dépasse 
de loin les possibilités d’Edipol et FontViewer 
réunis. 


CozorFonrs 


Votre SuperFonts monochrome (version française 
Pom's) est transformé en ColorFonts, permettant 
désormais l'impression dans les sept couleurs de 
l'Imagewriter II (noir, jaune, rouge, bleu, orange, 
vert et violet), en conservant bien sûr toutes les 
possibilités de SuperFonts (polices et styles variés, 
justification à droite, tabulations, impression 
d'images). 

Les changements de couleurs peuvent, comme les 
changements de polices ou de styles, intervenir à 
tout endroit, même au milieu d'un mot. Vous 
pouvez aussi imprimer une image dans la couleur 
souhaitée. 


En bonus, ColorFonts vous donne aussi accès aux 
caractères normalement inaccessibles par Super- 
Fonts (codes 0 à 31). 


Bien entendu, les commandes habituelles restent 
inchangées. 


ColorFonts est compatible avec les autres impri- 
mantes, mais imprime alors en monochrome. 


de DANIEL LUROT 


EpIFoNTs 
Une nouvelle applicatien TimeOut 


Avec EdiFonts, vous pourrez visualiser, modifier et 
imprimer vos polices de caractères, mais aussi en 
créer de nouvelles (en partant de zéro), copier des 
caractéres d’une police vers une autre. Tout ceci 
sans quitter AppleWorks ! 

Avec à votre disposition un index des polices 
(analogue à l'index des fichiers AppleWorks]) per- 
mettant de travailler sur plusieurs polices {jusqu'à 
sept à la fois). 


Affichage de la police page par page, commandes 
ergonomiques 

Accès rapide aux caractères désirés 

Copie d'écran graphique 

Impression de la police complète 

Visualisation individuelle et modification des 
caractères 

Édition rapide grâce à des cernmandes puis- 
santes : insertion ou effacement de colonnes ou 
de lignes — déplacement du caractère tout 
entier dans les quatre directions — effacement 
dela grille d'édition — modification des width’ et 
‘offset’ 

Création de nouveaux caractères 

Copie decaractèresinterne. vers le presse-papiers, 
du presse-papiers 

Suppression de caractères 

Visualisation, impressiun et modification des 
paramètres globaux de la police — firstC — 
lastC — leading et kernMax — ascent — descent 
— nom de la police 








La disquette ExtraFonts existe en5,25"/140Koet 3,5"/800K0o. ExtraFonts est compatible avec les Apple 


//e 128Ko, //c, ICS. 


ColorFonts nécessite AppleWorks, une ImageWriter II et TimeOut SuperFonts en version française. 
EdiFonts nécessite AppleWorks et au moins un TimeOut en version française. 


ExtraFonts : 500,00 F — Carte Joker : 450,00 F — Bon de commande page 70 
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Éditorial 


Apple Expo 


La grande fête automnale d'Apple aura lieu cette année dans 
le CNIT rénové de la Défense. Apple profite de ce nouveau 
cadre pour améliorer encore l'accueil du visiteur, ‘look’ des 
stands, cartes d'identification magnétiques pour les 
visiteurs. 

Comme l'an passé nous serons à votre écoute, stand M9; vous 
rencontrerez également des auteurs de Pom’s présents 
chacun des quatre jours du 27 au 30 septembre. 

C'est pour nous une occasion de vous offrir des invitations, 
lisez page 71. 


Où s'arrêtera-t-1l ? 


Daniel Lurot frappe encore: SuperFonts imprime encouleurs 
sur l'ImageWriter II et voici un éditeur de polices de 
caractères surpuissant et intégré. AppleWorks est devenu 
une plate-forme depuis laquelle, avec la souris, on travaille 
des textes, on crée des graphes associés au tableur, on copie 
des disques, on imprime ‘à la Mac’ le tout sous le contrôle de 
procédures automatisées… 


Notre souci de diversité dans la réalisation de votre revue 
nous conduit à ouvrir les colonnes au GSBasic avec un Puzzle 
fort élégant et au LightSpeedC sur Mac. Une belle place est 
réservée à un ‘shareware’ Mac fabuleux présenté sur six 
disquettes : à découvrir sous la plume d'Ariel Sebban quine 
jure plus que par ADN. 


Hervé Thiriez 
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À l'occasion de cet article, Pom's 
vous présente deux illustrations : un 
petit divertissement pédagogique de 
calcul mental, et un gros fichier de 
macros spécialement consacré aux 
opérations de Traitement de textes. 


Les "sources" des deux fichiers sont présentés dans l'article 
lui-même, et inclus sur la disquette Pom's sous les noms 
CALCUL.UM et MACROS.TDT. La disquette Pom's 
contient en outre les deux fichiers "Task" correspondants, 
nommés CALCUL.TSK et TDT.TSK. Vous y trouverez 
enfin le fichier CALCUL.MENTAL (tabieur AppleWorks) 
dont CALCUL.TSK a besoin pour fonctionner (le modèle 
en est donné à la fin de cet article) 


Note : Les deux fichiers "Task" sont prévus pour des Apple 
Il (GS ou autres) dotés d'une horloge, car ils démarrent 
AppleWorks sans faire la pose pour insérer la date. L'article 
explique comment modifier la première macro du fichier 
"source" pour qu'AppleWorks fasse la pause. 


Les fichiers Task 


Les fichiers “Task” sont une innovation d'UltraMacros 
inconnue des habitués de SuperMacroWorks. Ils vous 
pennettent de disposer d'ensembles de macros spécifiques, 
en nombre illimité, activables à tout moment en un clin 
d'œil à partir d'AppleWorks ou sélectionnables avant même 
de démarrer AppleWorks. 


Avec SMW, quand on avait besoin d'un jeu de macros 
spécifiques (différentes de celles déjà installées au 
démarrage), il fallait charger le fichier Tdt correspondant sur 
le Bureau, puis l'activer (en le compilant avec la commande 
oa-=). Ces macros, présentes en mémoire vive, 
s'évaporaient à l'extinction d'AppleWorks. 


SMVW n'autorise qu'un seul jeu de macros au démarrage 
d'AppleWorks. Pour le changer, il faut passer par une 
procédure relativement compliquée : quitter AppleWorks, 
lancer SMW, choisir l'option "Compiler", désigner le 
fichier à compiler, le compiler, indiquer à SMW 
l'emplacement d'AppleWorks, y installer le nouveaujeu de 
macros compilées, etenfin redémarrer AppleWorks. 


Avec UltraMacros, l'équivalent de la compilation SMW 
avec <0a-=> reste possible, avec en prime des “finesses" 
supplémentaires : on charge le fichier Tdi de macros sur le 
Bureau, on fait Pomme-Escape pour aller au menu 


rammation . 





Dimitri Geystor 


TimeOut, et l'application TimeOut "Macro Compiler" 
donne le choix entke : 


1. Compiler avec pause à chaque ligne ou non 
2. Compiler tout le fichier ou à partir du curseur 
seulement. 


De plus, le compilateur d'UltraMacros est intelligent", car 
il signale les fautes de syntaxe ou de logique éventuelles. 


Mais UltraMacros vous donne surtout le moyen de 
pré-compiler des jeux entiers de macros spécifiques, qui 
peuvent être conservés sous la forme de fichiers-système 
{type SYS). 


Les avantages ? 


1. L'interchangeabilité instantanée à tout moment à partir 
d'AppleWorks (avec l'application Macro Options du 
menu TimeOut). Il n'y a plus à attendre le temps de la 
compilation, qui n'est pas négligeable dans le cas de 
gros fichiers. 

2. Le désencombrement du Bureau d'AppleWorks : les 
fichiers "Task", de type SYS, n'ont pas besoin d'y être 
chargés. 

3. La faculté de choisir le jeu de macros avant même de 
lancer Apple Works. 

4, La possibilité d'enchaîner immédiatement sur un 
macro-programme, grâce à l'exécution automatique de 
la première ou de la deuxième macro du fichier "Task". 


Les macros d'un fichier "Task" 
sont-elles différentes ? 


Rassurez-vous, la réponse est NON. C'est la nature du 
fichier qui est différente, mais les macros dont il est issu 
sont des macros UltraMacros tout à fait normales. Il faut 
simplement réserver les DEUX premières macros aux 
fonctions de démarrage. 


— La première macro correspond au démarrage extérieur à 

AppleWorks, et exécute à votre place les gestes que 
vous faites quand vous démarrez votre copie d'Apple Works. 
Réduite à sa plus simple expression, cette première macro 
contiendra deux RTN, correspondant aux deux poses que 
fait AppleWorks au démarrage (l'une pour insérer la 
disquette “Programme”, l'autre pour valider la date). Si 
vous avez besoin d'insérer la date manuellement, il vous 
faut insérer une commande <input> entre les deux RTN. 
Reportez vous aux exemples commentés de cet article. 
Vous pouvez enfin, mais ce n'est pas obligatoire, terminer 
la première macro par un "goto" à la deuxième. 
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— La deuxième macro correspond au démarrage à partir 
d'AppleWorks, au moyen de l'application Macro 
Options. Dans ce cas la première macro est totalement 
ignorée. Sous sa plus simple expression, la deuxième 
macro pourrait être totalement vide. Mais il est 
recommandé d'y inclure un petit message qui confirme que 
les macros du fichier "Task" sélectionné ont bien été 
activées. Si vous avez prévu un macro-programme 
autonome, c'est cette macro qui enclenchera les diverses 
opérations nécessaires (voir, par exemple, le source du 
macro-programe ‘budget' sur la disquette Pom's n°41). 


Comment créer un fichier "Task" ? 


La disquette UltraMacros vendue par Pom’s contient les 
applications TimeOut dont vous avez besoin, à savoir 
"Macro Compiier" et "Macro Options". 


1. Mettez le fichier "source" (Tdt) qui contient vos macros 
sur le Bureau d'AppleWorks. Compilez-le avec Macro 
Compiler. 


2. Appelez Macro Options avec Pomme-Escape, et 
choisissez l'option 2 "Créer fichier Task”. Vous serez 
invités à taper le nom du futur fichier "Task". Donnez-lui 
un nom clairement reconnaissable, faites RTN. Macro 
Options vous informe que le fichier "Task" a été créé. C'est 
iout. Si un fichier "Task" du même nom existe déjà, vous 
en êtes aussi informé, et vous avez le choix soit de 
renoncer, soit de remplacer l'ancien fichier par le nouveau. 


Comment démarrer un fichier 
"Task! ? 


1. À partir d'AppleWorks, en appelant l'application Macro 

Options, option 1. La liste des fichiers "Task" 
disponibles s'affiche, vous n'avez qu'à choisir. 
Note : il est commode d'inclure dans chaque fichier 
"Task" une troisième macro qui automatise cette 
sélection (voir exemples), et de transformer en fichiers 
“Task” vos macro-fichiers les plus courants : vous 
pourrez ainsi faire des permutations instantanées. 


2. Au moyen d'un sélecteur, du type PROSEL ou BBB. 
Nete : Le propos de cet article n'est pas d'expliquer 
comment fonctionne un sélecteur. À l'intention de ceux 
qui n'ont pas encore ProSel - mais comment ont-ils 
pu survivre sans lui ? — je précise quand même que le 
fichier ProD@S de la disquette d'UltraMacros contient le 
mini-sélecteur BBB ou Bird's Better Bye. Pour y 
accéder, il faut partir de l'écran du Basic Applesoft, taper 
BYE et faire Return. 





Souvenez-vous que : 


1. Un fichier "Task" est un fichier de type SYS qui réside 
aux côtés du fichier ULTRA.SYSTEM sur votre 
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disquette AppleWorks. Il contient des macros pré-compilées 
prêtes à l'emploi, et n'a pas besoin d'être chargé sur le 
Bureau d'AppleWorks pour être activé . 


2. On peut l'activer instantanément à partir d'AppleWorks 

par l'application Macro Options du menu TimeOut. 
Dans ce cas, la deuxième macro du fichier sera 
automatiquement exécutée. 


3. On peut aussi l'activer avant de démarrer AppleWorks 

au moyen d'un sélecteur de programmes du type ProSel 
ou Bird's Better Bye. Dans ce cas, le fichier "Task" entraîne 
automatiquement à sa suite le démarrage d'AppieWorks, et 
exécute la première macro qu'il contient. 


4. Le fichier "source" {c'est-à-dire les macros écrites en Tdt 
AppleWorks) est nécessaire une seule fois, à la création 
du fichier "Task". Ensuite, on n'en a plus besoin pour 
activer les macros, mais il est sage de l'archiver pour 
pouvoir relire les commentaires en cas de modifications. 





Fichier MACROS.TDT 


Un fichier de macro-commandes consacré au traitement de 
textes (avec plusieurs commandes inédites) 


START 


Macros de démarrage du fichier "Task" : 


<ba-S>:<all 
d'AppieWorkxs, en cas de démarrage par 
sélecteur, hors AppleWorks) 
rtn {correscond à la cause pour insérer le 


f£Envoie au Menu principal 


disque Programme) 

{ input } (ici, l'input est inhibé ) 

rtn (valide la däte) 

b3-°>! (enchaîne sur la deuxième macro) 

Note : Si vous n'avez pas d'horloge, enlevez les 
parenthèses qui inhibent “input” avant le deuxième "rtn" 
afin qu'AppleWorks fasse la pose qui permettra d'insérer 
la date. 


<ba-">:<all (Démarrage avec Macro Options) 
msg ‘ Macros TdT activées ‘>! 

Dans cet exemple, la deuxième macro contient simplement 

un message d'information. Comme la première macro 

renvoie aussi à la deuxième, ce message s'affichera dans 

tous les cas de lancement du fichier "Task", 


Macro d'appel des fichiers "Task" : 
<ba-6>:<al1l 
$0="“Macro Options" 
oa-Esc find rtn rtn 
msg ' Choix = flèches. RITN pour valider, 


ESC pour abandonner ‘; 

















10 








begin k=key 

if k=x10 down rpt else if k=11 up rpt else 

if k=13 rtn stop else if k=27 esc esc stop 
> 


MACROS de TRAITEMENT de TEXTES : 


= 





<left>:<awp c=0 fcurseur en dèbut de ligne} 
begin 
oa-tab c=c+l ifnot c=18 1pt>! 
<right>:<awp (curseur en fir de ligne) 
sa-left : down : left>! 


Rappel : 

Les commandes AppleWorks Pomme-flèches envoient le 
curseur au début du mot précédent (oa-left) ou suivant 
(oa-right). 

La commande UltraMacros Pomme-pleine-Rtn (sa-Rtn, ou 
<find>) envoie le curseur au Retour-chariot (fin de 
paragraphe) suivant. 

Il n'existe pas de commande pour aller au début du 
paragraphe en cours. 

Rappelons aussi qu'aux yeux d'AppleWorks tout texte qui 
se termine par un Retour-chariot est un paragraphe ; à la 
limite, une ligne qui ne contiendrait qu'un seul espace serait 
quand même un paragraphe. 


La macro suivante renvoie le curseur en début de 
paragraphe, et fournit aussi en bas d'écran des informations 


précieuses pour la mise en page. Il est commode de 
l'actionner avant de créer une marge gauche ou une nouvelle 
valeur d'indentation avec les macros <sa-g> et <sa-i>, La 
macro fait la différence entre un “vrai” paragraphe (au 
moins deux lignes non-vides suivies d'un Retour-chariot), 
une ligne unique (non-vide) ou une vraie ligne vide. 


<ba-left>:<awp fcurseur au début du paragraphe 
et info sur MG, IN et CI) 
sa-* {lire info options) 
S$i=str$s g {définir les chaînes} 
ba-6 fformater MG) 
zoom ba-t ftest ligne) 
if qg=$d0 goto sa-4 else fsi code = ligne 
vide) 
k=0 (drapeau) 
begin ba-t 
dE p<128 sa-{ rpt else 
Ïf p>128 sa-) rpt >! 
{:<awp 
if q=$d0 down goto sa-5 else 


if f=1 goto sa-5 else 
if f=0 up k=2>! 
}:<awp 


if qg=$d0 down goto ba-L else 

if f=1 goto ba-L else 

if f=0 if k=0 up k=1 else 

if f=0 if k=1 down goto ba-L else 

if f-0 if k=2 down goto sa-5>! 
<ba-t>:<äwp ftest info ligne) 

t=32312 (début index des lignes} 

posn x,y {y=iligne) 

r=y*2+t-1: q=-peek r: (q=code de la ligne) 

p=peek $7c01 (info ligne ordinaire) 


ba-1 >! (test f=1) 
<ba-1>:<awp fteste la première ligne, 


sous-routine) 


si première ligne, 


up posn ä,b 
if y=b f=1 else f=0 down>! 
<ba-L>:<awp fcas de la ligne unique, 
sous-routine) 
se-left ba-6 sa-* p=peek $S7c0l z=p-128 


msg "--- Ligne unique de ‘" +4 str$ z + " car. 
: MG= "+ S$S1 +", IN= "+ str$s i + ", CI= 
I + SCTS NC. HMS, Stop»?! 
4:<awp msg '--- Ligne vide, MG= ‘ + $1 + ", IN-= 
MH SEE? LE + M GT= MF SERS Cr AU 
sa-left stop >! 
5:<éwp msg "'--- Paragraphe ; MG= ‘" + $1 + ", 
IN= "+ SCES À +, CT =" + SES CE ME 


stop>! 
*i<awp fSous-routine : Lecture des Options. 

Merci à Baniel Lurot} 

sa-left 

poke $031f,ScO:call $031b:G=peek $031a +peek 
S7d67 (MG) 

poke $031f, $bf:cal1 $S031b:I=peek $031a 

poke $031f,$c1:call $031b:J=peek $031a 
(JU=U, J, C) 

poke $031f,$c3:cali $031b:L=peek $031a (LC) 

poke $031f,Sc4:call $031b:D=peek $031a (MD) 

poke $031f,ScS:calli $031b:C=peex $031a >! 
{CI) 


(IN) 


Aller faire une édition, et revenir au 


point de départ 


La macro ci-après permet (après l'avoir actionnée), de se 
déplacer n'importe-où dans le fichier, de l'éditer puis de 
revenir au point de départ en appuyant sur la touche "£”. 


Tous les déplacements sont possibles : souris, flèches, 
Pomme-flèches, Pomme-l à Pomme-9, recherches avec 
Pomme-R. 


On peut taper un texte (sauf la touche £ ), effacer avec la 
touche DEL et même avec Pomme-E (y compris effacer des 
options d'impression). 


On peut faire du couper-coller (interne, ou par le 
Presse-papiers). 


On peut même aller dans d'autres fichiers... La macro reste 

active tant qu'on n'a pas appuyé sur la touche "£" 

(d'ailleurs, le message de bas d'écran le rappelle), et elle sait 

alors retrouver automatiquement le fichier de travail sur le 

Bureau. Désolé, les autres macros ne sont pas reconnues 

pendant que <ba-e> est active. 

<ba-e>:<awp {Se déplacer ou éditer du texte, et 
revenir) 

wW=peek $c54 ( N° du fichier sur le Bureau } 

v = peek S$S7cé61 { statut zoom ? } 

posn n,0 oa-o>FM<rtn>254<rtn esc 

posn KX,y x=0-y+1 

begin 

msg " Déplacements et édition aucorisés. 
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Tapez £ pour revenir au point de départ 
rHCCrL=x: 

k=key 

ifnot k=35 print chr$ k:rpt {dépiacements et 
édition) 

else (retour) 

oä-q print w rtn 

oa-L>m254<rtn rtn oa-E rtn ({retouve et 
efface la marque} 

begin posn a,b (re-positionne le curseur) 

ifnot x=0 x=x-1 down rpt else 

ifnot a=n right rpt else 

msg ““ : if v=0 oa-z >! 


La macro suivante nettoie tous les espaces superflus en fin 
de paragraphe. Mettez le curseur sur une ligne, pressez 
SA-W : le curseur va au premier retour chariot SUIVANT, 
et enlève les espaces qui le précèdent s'il y en a. 


wW:<all (nettoie les espaces superflus en fin de 

paragraphe) 

find (va au premier retour chariot }) 

begin 

left : x = peek $10f5 (recule, lit sous le 
curseur) 

if x = 160 then sa-del (supprime espsce 
éventuel} 

rpt>! 


Cette macro recolle deux paragraphes, quel que soit le 
nombre de lignes vides qui les séparent. 


Efle sert aussi à rattraper facilement un retour chariot tapé 
par mégarde, ou à éliminer proprement un retour chariot en 
bout de ligne, en conservant les espaces éventuels. 


Le curseur doit être sur la première ligne qui sui] le hiatus. 


h:<awp zoom o4-z f{ affiche les R.C. ] 
up right sa-left 
x = peek $10fS : {fnot x = 255 then sa-rtn 
sa-del 
Zoom stop (supprime un retour chariot 
involontaire) 
else 
begin {va en début de ligne) 
x = peek S$S10fS : ifnot x = 255 then oz-ieft 
rpt elseoff 
begin { supprime ies R.C. }) 
x = peek $10f5 : ifnot x = 160 then 
del rpt else del zoom>! 


Macros de tabulation par Randy Brandt 
ESEESS===S==SS FREE Sy. === === 

Idée originale de David R.Grigg ("Monsieur.Macro" 
d'Australie). 





Note : Avant d'essayer ces macros, organisez selon vos 
désirs les taquets de tabulation avec la commande 
Pomme-M. 


Avancer le texte jusqu'au taquet de tabulation suivant : le 
curseur "repousse" tout le texte. 








<tab>:<al1 

w = peek $10F1 : insert (sauve type 
curseur, force insertion) 

$0 = screen 1,2,80 : {1it dans $0 la ligne 
d'affichage des taquets]} 

begin 

spc : (insère un espace) 

posn x,y : (lit position du curseur) 

y = $8ff + x : (lit pos.taquet sur buffer 


d'écran) 
Z = peek y : if z = 61 then ({taguet présent 
? 61 est le "=" } 
rpt ( répète jusqu'au taguet suivant |) 
elseoff 


if w = ] oa-4a : ctrl-x>! f rétablit le 
curseur; la commande “vide" ctrl-x rend 
visible le nouveau curseur) 


Faire reculer le texte jusqu'au taquet 
de tabulation précédent: 


Le 1exte à gauche du curseur est écrasé. 


<Ctrli-X>:<awp left oa-e oa-tab rtn>!  { 
sa-Clear sur un IIgs) 


Aligner une colonne de chiffres ou 
justifier le texte à droite : 


Mettre le curseur au début du chiffre à aligner 


<Ciril-D>:<awp (Justification à droite } 
sa-tab x = O0 finsère des espaces pour 
pousser le nombre jusqu'au teqguet) 


begin 

z = peek $10FS (lire le caractere sous le 
curseur) 

ifnot z = 160 then fespace ? si oui, saute ä 
oa-left ) 


ifnot z = 172 then right : x = x + 1 
(recherche la virgule }) 

rpt else 

oa-left (recule au début du nombre } 

begin 

ifnot x = O then del : x = x —- 1 (recule 
pour aligner ies virgules }) 

rpt>! 


Aligner une colonne de nombres sur la 
virgule : 


La liste doit se terminer par une ligne vide 


<ctrl-qg>:<awp 
v = peek $7c61 : (statut zoom ?} 
if v = O then oa-z eiseoff (zoom arrière) 
sa-left (aller au début de première ligne) 
begin 
sa-ctrl-d (tabulation décimale) 
sa-left (début de ligne) 
down (ligne suivante) 
z = peek $10F5 : (caractère sous curseur ?) 
ifnot z = 255 then (continue sauf si Return) 
rpt elseoff if v = O oa-z>! rétablit stetut 

zoom 
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----> échantillon de liste de nombres : mettre 


le curseur sur le premier nombre, et faire 


sa-ctri-q 


#23,;:34 
2,45 
1234,46 
88,00 
67890, 12 


Commandes de marge gauche et 
d'indentation 


Il est recommandé de les faire précéder de ba-left (curseur en 
début de paragraphe + informations). 


Pour un complément d'information, faites sa-V: 

-> Cette dernière macro permet de repérer exactement la 
dernière commande en vigueur pour la marge gauche, 
l'indentation ou les car/inches. 

-> Si vous souhaitez modifier l'option ainsi repérée, tapez 
aussitôt après la commande sa-T : elle posera le curseur 
dessus. 

-> Pour revenir ausitôt après à la ligne de travail quittée, 
tapez sa-B. 

Attention : Ces trois macros sont conçues pour travailler 

ensemble. La macro sa-V fait la recherche en remontant 

vers le début du texte, sa-B en descendant vers la fin. Et 
c'est sa-T qui mémorise la ligne que retrouve sa-B. 

Si le texte est long, et si l'option est à son tout début, la 

recherche par sa-V prendra un peu de temps - soyez patient. 

Les spécialistes du langage machine devraient pouvoir 

réaliser la même macro en beaucoup plus rapide ; avis aux 

amateurs, Pom’s attend vos contributions ! 


v:<awp (iocaliser l'option IN, MG ou CI en 


vigueur) 

msg ‘ Options actives ? Taper G pour MG, I 
pour IN ou C pour CI ; Abandon = Esc !': 
sar* 

begin k=key 

if k=71 $4="MG" s=217 goto ba-ctrl-x 
elseoff 

if k=103 $4="MG" s=217 goto ba-ctri-x 
elseoff 

if k=73 $4="IN" s=222 goto ba-ctri-x 
elseoff 

if k=105 $4="IN" s=222 goto ba-ctri-x 
elseoff 

if k=67 $4="CI" s=219 goto ba-ctrl-x 
elseoff 

if k=99 $4="CI" s=219 goto ba-ctrl-x 
elseoff 


if k=27 msg “":stop elseoff rpt>! 


<ba-ctri-x>:<awp (recherche de l'option 
précédente) 
zoom oà-Zz 
a=32312 f=1 
posn Xx,ÿ 
b=y+2+a-1 
begin 
p=peek b 


ifnot p=s (si non trouvée) 

b=5-27 y=y-1 ba-3 ba-8 rpt else (continuer 
la recherche) 

b=b-1 m-peek b (si l'option est repérée) 

Sl=str$s g ba-6 (formäter MC) 


msg ‘--- L'option ‘ + $$ + " active est en 
ligre "+ str$ y + " - Av curseur MG= 
HS OI & P JETSr M" + SEM Cu M ONIN=UT Se 


SÉES À ramsi 


<ba-8>:<awp 

msg ‘=== Réecherche,., © + SES y>! 
<bz-6>:<awp {formater MS) 
i=ien $1 
ifnot 1= 1 $2-=left S1,1 
$2="0" $3=$1 elseoff 
Si= S2 4," 4 5351 


$3=right $1,1 else 


<bz-3>:<swp {si déjà début de fichier...) 


if b<y $i=str$ g ba-6 

msg ‘- Pas d'option ' +4 $£4 + " sélectionnée 
== Aù curseur s JMG= " + SD + " (OT = © 4 
SErS € FUh IN = érstrS. 1 +" Mistop 51 


t:<awp (trouver l'option en question) 

v=y (ligne cherchée) 

posn x,y h=y (ligne quittée) 

oa-1 oa-L>o<print $4 : rtn onerr stop 
{recherche) 

begin posn Xx,ÿ 

if v=y rtn stop else 

20<rpHt>! 


b:<awp (retour à l4 ligne Quittée) 
if h=0 stop else 
begin 
oâ-down posn x,y if y<h rpt else 
Oa-up 
begin 
down posn x,y if y=h stop else rpt>! 


Définir une nouvelle marge gauche : 

SSSSSESSSSSSSESESSESEEEEEESEESESSE==Z=Z= 

g:<awp (commande de marge gauche) 
sa-* $i=str$ g ba-6 


msg ‘--- Marge actuelle : ‘ + S2 # "," + $3 
+ ' ; modifier ? O/fN ‘': 

begin k=key 

if k=78 msg "‘“: stop else 

if k=110 msg "": stop eise 

ifnot k=79 ifnot k=111 rpt else 

msg ‘ Tapez la nouvelle marge, et RTN ‘: 


SO=getstr 4: 
oä-0 
>mg< rtn sa-0 
onerr goto sa-e rtn esc msg ""“:stop>! 


Définir une nouvelle indentation 


i:<awp (commande d'‘'indentatien ) 
$2= “Indentation " 
sè-* $i=str$ à 
sa-k 
>in< rtn print x: 
msg “‘“:stop?! 


0a-0 
Ftn e5s€e 
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k:<awp (sous-routine} 
X=0 sa-m 
poke $7D5,S:0 : {clic souris = RTN j 
begin k=key 
if k=21 if x>29 rpt elseoff 
if k=21 x=x#1 sa-m rpr elseoff 
if k=8 if x=0 rpt elseoff 
ÎÉ k=8 x=x-1 sa-m rpt elseoff 
if k=27 bell ess esc msg '" Abandon ‘': stop 
elseoff 
ifnot k=13 rpt >! 


m:<awp (sous-routine) 
msg "Indeñter de " + str$ x + " 
; valeur äctuelle IN=" + strsS i =" ";: 
hilight 13,23,14,23>1: 


e:<awp (sous-routine, message d'erreur) 
bell esc esc 
msg " Valeur non reconnue, Recommercez ‘ : 
stop>! 


Nettoyage radical d'une option 
d'impression : 


Si vous souhaitez éliminer une option d'impression partout 
dans le texte, c'est la commande suivante qui fera table rase. 
Elle vous invite d'abord à indiquer quelle option vous 
souhaitez éliminer, puis passe à l'action : 


<ctrl-e>:<awp félimine totalement l'option 

indiquée) 

zoom 08-z 0-1 

msg ‘ Nettoyage total : tapez l'option à 
éliminer : p.e. MG, MD, etc, puis RTN ‘ : 
04a-0 4 

begin 

oa-L>o<sa-0 rtn 

onerr goto ba-f (arrête en fin de parcours] 

FENn OarE rtn rpt>:! 


<ba-f>:<awp {arrête en fin de parcours) 
spc stop>! 


Effacements, insertions, inversions : 


ESS == === === 


Rappel : oa-DEL et sa-DEL effacent le caractère SOUS le 
CUrSur. 


<spc>:<awp (INSERE UN ESPACE quel que soit le 
mode) 
p=peek $10f1 if p=1 (si mode recouvrement) 
Od-à Sspc 6a-a 
else spc>! (si mode insertion) 


Les trois effacements suivants envoient le texte sur le 
presse-papiers, d'où on peut le récupérer avec sa-U: 


d:<awp (efface le mot qui est sous ou devant le 
curseur) 
right oa-left 0oa-D 
>S< 
oa-right left rtn>! 
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y:<awp (efface toute la ligne) 
sSà-left oa-E>S<down left rtn >! 


<ctrl-y>:<awp (efface la ligne à gauche du 
curseur) 
left><os-D>S<sa-left><rtn>! 


u:<awp (récupère le contenu du presse-papiers) 
oa-C>D! 


z:<äwp (place dans $0 le mot qui est sous ou 
devant le curseur) 
k=peex 510f: {statut insertion/recouvrement) 
right oa-left 
begin p=peek Si0fS 
ifnot p=160 reaûa rpr elseoff 
if k=0 ea-à>! 


a!:<awp féchañrge deux caractères : le précédent 
pèsse devañt) 
k=peek S10f1 
left read del right insert sa-0 left if k=1 
oa-a>! 


<ba-a>;<awp (échange deux mots : le précédent 
passe devant) 
sa-z oa-e oà-left rtn oa-left insert sa-0 
SpC 
if k=1 oa-a>! 


Divers 


Zéros barrés : 
Ordonner à l'imprimante d'imprimer des zéros barrés ou non 
{allumer l'imprimante d'abord !) : 


<ctrl-c>:<awp (Zéros barrés - allimez 

l'imprimante avant la macro) 

msg ‘ Imprimer zéros barrés ? Oui = RTN / 
Non = ESC ‘: 

begin k=key 

ifnot k=13 ifnot k=27 rpt else pr£ 1: 

if k=13 : print chr$ 27 + "D" + chrS O0 + 
chr$ 1 : else 

print chrS$S 27 + "2" + chr$ O0 + chr$ 1 : 
elseoff pré O>! 


Survol-éclair du fichier : 

Gauche/droite = oa-1 à oa-+9, haut/bas = écran 
par écran 

<ba-2>:<awp 


$1 = " Flèches : dr/g = oa-1/9 ; haur/bas = 
écran par écran. RTN = Stop ‘ 
e=1 msg S1 +" ": 


begin k-=key if k=10 oa-down £3=" 
Descend " bà-7 rpt else 


if k=11 oa-up $3=" Monte “ ba-7 rpt 
else 

if k=8 if a=1 $2= "oa-" + str$ 
a:ba-2 $3="" rpt else 

if k=8 left a=a-1l $2= "oa-" + strs 


atba-2 S$S3="" rpt else 


mm — 
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if k=21 if à=9 S2= “oa-" à: str$é 


&tba-2 $3="" rpt else 
if k=21 right a=a+i $2= "oa-" + str$ 
a:ba-2 $3="" rot else 
ifnot k=13 rpt else 
msg "3 sSt0p>"! 
<ba-22: <äwp 
o=176 + a : print chr$ 9 : msg $1 + $2 <" 


vs hilight 48,24;51,;-2454 
<baä-7>:<awp 


msg $1 + $3 +" " hilight 48,24,51,24>1! 


Rechercher une page : 


<ctrl-P>:<awp (localise une page) 
o&-K rtn os-L>P<input rtn rtn>! 


Numéroter les pages et/ou insérer un 
Haut ou Pied de page 


Les numéros de pages font intervenir trois options 
d'impression différentes : 


1. L'option NO (numéro page) décide du numéro qui sera 
affecté à une page. Elle sert uniquement à modifier le 
décompte automatique des pages que tient AppleWorks. 


2. L'option PN (imprimer numéro de page) marque 
l'endroit où l'on veut imprimer le numéro de page. 
L'endroit est matériatisé par le symboie "‘". On peut 
l'insérer dans le corps du texte pour des utilisations 
spéciales (le numéro ne sera imprimé qu'à cet endroit du 
texte, sans être répété ailleurs) , mais normalement on 
l'insère dans le Haut de page ou le Pied de page (dans ce 
cas, il réapparaît à chaque page et les numéros augmentent 
automatiquement d'une unité à chaque nouvelle page). 


3. L'option PP (Pied de page) ou HP (Haut de page) décide 

si la pagination apparaitra en haut ou en bas à chaque 
page. Il y a une règle à observer quand on place le curseur 
pour les options HP et PP : l'option PP peut être insérée 
n'importe où dans une page, et le Pied de page apparaîtra 
dès cette page. L'option HP doit être insérée dès la 
PREMIERE ligne de la page, sinon elle n'apparaîtra qu'à la 
page suivante : souvenez-vous de cette règle fors de la 
première phase de la macro ci-après. 


Cetie macro s'utilise de la façon suivante : 


1. Tapez ba-ctri-N (Double-Pomme-Ctri-N : AppleWorks 

affiche la pagination en vigueur. Avec les flèches, 
Pommes-flèches, souris ou oa-1 à 0a-9, placez le curseur 
dans la page où vous voulez que commence l'affichage des 
pages, et faites RTN. 


2. Indiquez ensuite le numéro que vous souhaitez attribuer 

à cette page, suivi de RTN, ou faites simplement RTN 
si vous conservez la pagination d'AppleWorks (telle 
qu'affichée avec 0a-K), 


3. La macro vous demande si vous avez déjà créé un haut 


de page ou un bas de page avec une option PN incluse ; 
si vous répondez "O", la macro se termine. Si vous 
répondez "N", vous êtes invité à choisir entre une 
pagination en haut de page ou en bas de page, et la macro 
fait le travail. Le modèle imprime le numéro de page vers 
la droite de la ligne. Cette ligne apparaîtra une seule fois 
dans votre fichier aussitêt après l'option “ -------- Haut 


page" où “------ Pied page", mais l'imprimante la répétera à 
chaque page jusqu'à la fin du texte, ou jusqu'à ce que vous 
la changiez. Vous pouvez (une fois la macro terminée) 
éditer cette ligne à votre convenance (par exemple, ajouter 
"Page ” avant le symbole ”", ou un sous-titre, etc. 


Note : Cette macro convient aussi pour insérer un Pied 
de page ou un Haut de page sans pagination. 11 suffit. 
une fois la macro achevée, d'éditer la ligne qui suit 
l'option en y supprimant le symbole ", et en insérant 
le texte souharté. 


<ba-ctrl-n>:<aws 

o&-k rtn 
* Placez ie curseur lä où la paginstion 
puis KTN ‘ 


msg 
doit commencer, 

begin k=key 

iFnot k=27 ifnot k=13 print chr$ k:rpt else 

if k=27 bell msg ‘ Abandon ‘': else 

if k=13 msg ‘ Tapez le nouveau N° de cette 
päge, ou ÀTN seul pour ne rien changer ‘: 
$0= getstr 6 : 

ifnot S$0="" oa-o>no< rtn sa-0 rtn esc 

elseoff 

bell msg " Avez-vous géjà créé un HP ou PP 
ävec une option PN ? OfN ‘: 

begin k=key 

if k=79 msg “": 

if k=111 msg "“": stop else 

ifnot k=78 ifnot x=110 rpt eise 

msg " Voulez-vous la pagination en Haut ou 
er Pied de page ? #/P ; Esc = stop ';: 

begin k=key 

ifnot k=27 ifnot k=72 ifnot k=10$4 ifnot kx=80 
ifnot k=112 rpt else 


stop else 


if k=27 msg ‘ Abangon ‘ : stoæ eise 
if k=72 $o="HP" elseoff 
if k=104 $SO="HP" elseoff 
if k=80 $o="PP" elseoff 
if k=112 $o="p»p" elseoff 


oä-0 sä-0 rtn esc sa-left rtn up c=0 
begin spc c=c+1 ifnot c=60 rpt else 
oa-o>PN<rtn esc stopo>' 


Sauvegarde automatique si vous avez une 
horloge : 

En faisant Double-Pomme-Cirl-A vous mettez en route | 
sauvegarde automatique (horloge nécessaire). Le fichier e 
Cours sera sauvegardé toutes les 5 minutes environ. 


La fréquence peut être modifiée (deuxième ligne). 


Si vous êtes dans un menu au moment du déclenchement d 
la sauvegarde, celle-ci n'aura pas lieu, mais se fera la foi 





Pom'’s n° 











d'après. 


<ba-ctrl-a>:<all $0 = time2$ : H = vai $0 : $0 
= right $0, 2:s 
M = val $0 + 5 { le 5 veut dire 5 minutes 
entre chaque sauvegarde) 
msg “ Sauvegarde automatique enclenchée “ : 
wake ba-ctrl-b at H:M>! 


<ba-ctrl-b>:<all x = peek S$Se8ée: if x = O then 
oa-s elseoff ba-ctrl-a>! vérifie que le 
fichier est bien à l'écran au moment de la 
sauvegarde par oa-s. 


Faites Pomme-Ouverte-CONTROL-N pour annuler Ia 
sauvegarde automatique. 


end 


Rappel des commandes de Tdt 


disponibles : 


sa-left Curseur en début de ligne 

sa-right  Curseur en fin de ligne 

oa-left Curseur au début du mot précédent 

oa-right Curseur au début du mot suivant 

sa-rin Curseur au Retour-chariot suivant 

ba-left Curseur au début du paragraphe courant, et infos 
sur valeurs MG, IN, CI et type de ligne 

ba-e Aller éditer, déplacer, copier du texte puis revenir 
automatiquent au fichier et point exacts de départ 

sa-w Nettoyer les espaces superflus en fin de 
paragraphe 

sa-h Coller 2 paragraphes 

sa-tab Repousser le texte au taeuet de tabulation suivant 

sa-ctrl-x Ramener le texte au taquet de tabulation précédent 

sa-ctrl-d Aligner une colonne de chiffres, ou justifie à 
droite 

sa-ctrl-q  Aligner une colonne de nombres sur la virgule 

sa-v Repèrer la dernière option active MG, IN ou CI 

sa-t Envoyer le cuseur sur celle option 

sa-b Ramener ensuite le curseur à la ligne de travail 

sa-g Définir une nouvelle marge gauche 


sa-i Définir une nouvelle indentation 


sa-ctrl-e  Eliminer totalement une option (au choix) 

sa-spc Insérer un espace en toules circonstances 

sa-del Effacer le caractère sous le curseur 

oa-del Idem 

sa-d Effacer le met sous le curseur 

oa-y Effacer la ligne à droite du surseur 

sa-y Effacer ioute la ligne 

sa-ctrl-y Effacer la ligne à gauche du curseur 

sa-u Récupérer les effacements par sa-d, sa-y el 
sa-ctrl-y 

sa-z Placer dans $0 le mot sous le curseur 

sa-a Echanger deux caractères 

ba-a Echanger deux mots 

sa-ctri-c Zéros barrés ou non barrés à l'imprimante 

ba-z Survol-éclair de tout le fichier 

sa-cirl-p Recherche de page 

ba-ctri-n Pagination, Hauts et Pieds de page automatieues 

ba-ctrl-a Sauvegarde automatique (horloge nécessaire) 

oa-ctrl-n Arrêt de la sauvegarde automatique 
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Fichier CALCUL.UM 


Un petit programme récréatif de calcul mental (a besoin du 
fichier Tableur CALCUL.MENTAL) 


START 


Macros de démarrage du fichier “Task“ : 
<ba-$>:<ali 
d'Appleworkxs, en cas de démarrage par 
sélecteur, hors AppleWorxks) 
rtn (correspond à la pause pour insérer le 
disque Programme} 
{ input ] (ici, l'input est inhibé ) 
rtn (valide 1a date) 
ba-°>1 


(Envoie au Menu principal 


{enchaîne sür la deuxième macro) 


Note : Si vous n'avez pas d'horloge, enlevez les 
parenthèses qui inhibent "input" avant le deuxième 
"rtn" afin qu'Appleworks fasse la pose qui perinettra 
d'insérer la date. 


<ba-°>:<a11 
msg ‘ Macros Calcul activées. Chargez 
CALCUL.MENTAL et tapez SA-L ">1 


(Démarrage avec Macro Options] 


Dans cet exemple, la deuxième macro contient un message 
d'information, Comme la première macro revoie aussi à la 
deuxième, ce message s'affichera dans tous les cas de 
lancement du fichier "Task". 


Exercice proposé : modifiez cette deuxième macro pour 
qu'elle charge automatiquement le fichier 
CALCUL.MENTAL sur le Bureau, et fasse sa-L. 


"Task" 


Macro d'appel des fichiers 


<ba-6&>:<all 

S90="Macro Cptions" 

ca-Esc find rtn rtn 

msg '" Choix = flèches. 
ESC peur abandonrer ‘: 

begin k=key 

if k=10 down rpt else if k=11 up rpt else 

if Kk=13 rtn stop else if k=27 esc esc stop 
>t 


ATN pour valider, 


Macros du programme 


<ba-a>:<asp 3-0 m=S1 n=8 o=59 p=8 
ba=1 
>plus< 
ba-2 
>+c12+c13< 
ba-3 sa-L >! 
<ba-s>:<asp d=8 
ba-1 
>moins< 
ba-2 
>+ei2-c13< 
ba-3 sa-L >! 








m=5i n=9 0-63 p=8 














D 


gen 








<ba-m>:<asp d=0 m=51 n=10 o=65 p=19 left >Egale<right: bell 





ba-1 msg ‘ Maintenant, tapez le résultat, suivi 
>Dfois< de RTN ‘ ;: 
ba-2 input right right! 
>#ci2*c13< <ba-3>:<asp 
ba-3 sa-L >! rtr cell 
<ba-d>:<asp d=1 m=51 n=1il o=58 p=11 $1=50 
ba-1 print chrSs 43 :>c15< rtn cell oa-b rtn 
up right cell down left x=val 590 if S0=51 >Juste< rtn else 
>div.par< >Faux< rtn left left 
ba-2 msg Di 
left left up up cell y=val $0 down down cell <bha-v>:<asp 
z=val $0 ifnot d=1 
e=x/y down left >Reste< right 257 ‘ Le résultat correct était * + S1 + ‘ >; 
bell msg ‘ Indiquez le reste ': irpet cell appuyez sur une touche ‘ : 
z=val $0 key sa-L else 
up msg ' Le résuitat était " + str$ a + ', 
right right if a=2 >Juste< down else >Faux< reste ‘ + str$ c * ‘ ; appuyez sur une 
down elseoff couche ‘: key sa-L>! 
b=a*ty c=x-b if c=7 >Juste< 1tn else >Faux< L:<asp 
tn bell 
elseoff sa-L>! msg ‘ Faites votre choix " : 
<ba-1>:<asp begin k=key 
oa-L>c<oä-y>cl2<rtn if k=65 ba-a elseoff if k=97 ba-a elseoff 
oa-b>L<down down down down rtn if k=83 ba-s eïseoff if k=11S ba-s elseoff 
bell hilight m,n,o,p if k=77 ba-m elseoff if k=109 ba-m elseoff 
msg ‘ Tapez un chiffre, suivi de ÀTN ': if k=68 ba-d elseoff if k=190 ba-d elsecff 
input down left >! if k=86 ba-v eiseoff if k=]18 b3a-v elseoff 
<ba-2>:<asp ifnot k=27 rpt else msg " Terminé ”: 
right bell oa-L>c<oa-y>cl2<rtn 
msg ‘ Tapez un autre chiffre, suivi de RTN oäâ-b>L<down down down down rtn 
te stop>! 
input down >" <down end 


Fichier CALCUL.MENTAL 


Voici le modèle du fichier Tableur CALCUL.MENTAL 
indispensable : Consiruisez-le en respectant scrupuleusment 
l'emplacement des lignes et des colonnes ! 








Fichier: CALCUL.MENTAL REVUE/AJOUT/MODIF. Esc: Menu Principal 

=== ammmmmmmb=s==m-s(nmsmmmme2f=-cmmmmpmeceeseepes=smess(s=s=== 
que 

2! Exercices de calcul mental : 
au ES 
4! Tapez : Option-L (SA-I) pour lancer l'exercice, 
5! 
6! : À pour Addition 
7! : S pour Soustraction 
8! Puis : Faites votre choix : M pour Muitiplication 
9! : D pour Division 

19! : V pour Vérifier 

| 11? ;: Escape pour abandonner 

12! 

23: 

14! 

15! 

16! 

27 

18! 
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Un patch pour SuperFonts 


Si vous utilisez le nouveau 
noyau Timeout.F21 de mars 89, 
vous rencontrez peut-être un 
problème pour imprimer ‘à 
partir du curseur’. Si tel est la 
cas, le programme suivant se 
charge d'apporter la modifi- 
cation nécessaire à SuperFonts. 


Veillez à ce que la disquette à 
modifier s'appelle bien 
‘/Superfonts’ ou bien modifiez 
la ligne 130. 


Bien entendu, le programme 
Basic et la patch sont sur la 
disquette d'accompagnement de 


ce numéro. 


Programme 
Patchsuperfonts 


100 ONERR GO170 320 

110 D$ = CHR$ (4): PRINT D$"p 
r£3": AOME : PRINT 

115 PRINT D$"prefix": INPUT P 
FX$ 

120 PRINT D$"bload sf.pat" 

130 SF$ = "/superfonts/to.supe 
rfonts.f" 

160 HOME : PRINT 

170 PRINT "Ce patch permet l' 
emploi de TO.SUPERFONTS.F à 
vec" 

175 PRINT " la nouvelle versi 
on (naurs 89) du noyau TineO 
ut # 

180 PRINT "-----—————————---- 


193 PRINT "Insérez votre disq 
ue contenant SuperFonts'": P 
RINT 

195 GOSUB 500 

200 IF AS = 
10 

220 PRINT DS$'"verify "SFS$S 

230 PRINT D$'"bsave"SFS$",aS200 
O0,bS$O4E2, 1$091A" 

250 PRINT “Modification réuss 


CHR$S (27) THEN 3 


ie," 

260 GOSUB 500: IF AS = 
(13) THEN 130 

300 PRINT “Pressez une touche 

pour continuer "“;: GET XS: 
PRINT 

310 PRINT D$"prefix"PFXS$S: END 

320 EL = PEEK (218) + 256 * 
PEEK (219) 

330 IF EL = 120 THEN PRINT " 
Impossible de trouver SF.PA 
T"“: END 

340 IFEL = 220 THEN PRINT " 
Irpossible de trouver TO.SU 
PERFONTS.F": PRINT "Tapez 1 


CARS 





El FÉES AVAIS CAN 
PARRTTEN 
CETTE SYMPHONIE KE) 


Fe IT PAS INACHEVEZ 
es 








Un éditeur musical 
fabuleux, un pilotage des 
instruments MIDI 


d'après la partition : 
Concert Ware, c'est 
Pagamini et Peterson en 
mémoire vive. 


Essai dans Pom's 44 














Daniel Lurot 


e nom d'accès à SuperFonts" 
: INPUT "":SF$: GOTO 220 

350 IF EL = 230 THEN PRINT " 
Inpossible de nodifier "SFS 
: GET AS: GOTO 160 

440 PCXE 216,0: RESUME 

500 PRINT “Pressez Return pou 
r corriger, ou Escape pour 
quitter: "} 

505 GET A$: PRINYF : IF A$ = 
CHR$S (27) THEN 520 

510 IF A$ < > CHRS$S (13) THE 
N 505 

520 RETURN 


Patch Sf.pat 


Après avoir sasi ces Codes sous 
moniteur, vous les sauvegarderez par : 
Bsave sf.pat, AS$2000,L2330 


2000:20 6F 11 00 15 2C 2A A9 
2008:00 8D AD 21 8D A8 21 20 
2010:8A 11 56 29 20 32 DO 08 
2018:26 03 50 29 41 26 4B 29 
2020:10 26 43 29 09 26 60 A9 
2028:80 8D AD 21 DO 31 A9 80 
2030:8D A8 21 20 8A 11 7C 2A 
2038:20 AS 27 AS 88 DO A5 
2040:8D 8D A9 21 AS 8E 8D AA 
2048:21 20 8A 11 80 2A AS 
2050:27 A5 88 DO D1 AS 8D 8D 
2058:AB 21 A5 8E 8D AC 21 20 
2060:00 11 20 6F 11 15 08 24 
2068:29 20 75 11 15 OA OD 29 
2070:20 6F 11 29 OA BO 21 20 
2078:6F 11 29 OB DO 21 20 75 
2080:11 15 OD 1B 29 AD FB 21 
2088:20 30 11 DO 03 4C 08 26 
2090:8D FB 21 AD SF 21 29 FC 
2098:0D FB 21 8D 5F 21 20 00 
20A0:11 20 3B 27 20 8A 11 DE 
20A8:28 20 SA 11 C9 1B FO DD 
20B0:C9 OD FO 4A C9 61 90 O2 
20B8:29 DF C9 41 DO OB AD FC 
20C0:21 49 FF 8D FC 21 4C 83 
20C8:26 C9 52 DO OB AD FD 21 
20D0:49 FF 8D FD 21 4C 83 26 
20D8:2C FD 21 30 1B C9 53 DO 
20E0:05 8D FE 21 FO BB C9 4E 
20E8:D0 05 8D FE 21 FO B2 C9 
20F0:42 DO O5 8D FE 21 FO A9 
20F8:20 15 11 4C 83 26 AD FE 
2100:21 8D SE 21 OE SF 21 OE 
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2108:5F 
2110:21 
2118:20 
2120:A2 
2128:85 
2130:5D 
2138:88 
2140:AD 
2148:3A 
2150:4C 
2158:26 
2160:20 
2168:FC 
217010 
2178:97 
2180:28 
2188:20 
2190:6F 
2198:21 
21A0:C9 
21A8:01 
21B0:30 
21B8: 7E 
21C0:17 
21C8:A9 
21D0:13 
21D8:85 
21E0:4C 
21E8:85 
21FO0:AE 
21rF8:B0 
2200:D9 
2208:A5 
2210 :0A 
2218:B0 
2220:8D 
2228:CF 
2230:60 
2238 : 69 
2240:3A 
2248:6C 
2250:20 
2258:4E 
2260:6C 
2268:20 
2270:18 
2278:72 
2280:20 
2288:20 
2290: 69 
2298: 70 
22A0:2D 
22A8:64 
22B0:35 
22B8:20 
22C0: 73 
22C8 :68 
22D0:18 
22D8:69 
22E0: 61 
22E8:2D 
22F0:20 
22F8: 65 
2300:65 
2308: 74 


7A 


2D 


4E FO 


FO AA 


2310:20 
2318:6E 
2320: 73 
2328:75 
2330:70 
2338:3A 
2340:6E 
2348:75 
2350:65 
2358:69 
2360:3F 
2368: 72 
2370: 7B 
2378:72 
2380:1A 
2388: 20 
2390:73 
2398 : 6F 
2320: 65 
2348 : 73 
23B0:74 
23B8 :28 
23C0:20 
23C8: 70 
23D0: 7D 
23D8: 6D 
23E0: 6E 
23E8:6F 
23F0:20 
23F8 : 6A 
2400:69 
2408:65 
2410:63 
2418:73 
2420:65 
2428:65 
2430 :6F 
2438: 69 
2440:69 
2448:6F 
2450:55 
2458:46 
2460:2E 
2468:20 
2470:20 
2478:20 
2480: 68 
2488: 39 
2490:6B 
2498:65 
242A0:20 
24A8:8D 
24B0:22 
24B8 :20 
24C0:02 
24C8: 21 
24D0:21 
24D8:AD 
24E0:86 
24E8:A8 
24F0:F8 
24F8:6F 
2500:B1 
2508:02 
2510:30 








7C 2B 
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2518:29 
2520:02 
2528:00 
2530:70 
2538:80 
2540:B0 
2548:20 
2550:13 
2558:35 
2560:D0 
2568:35 
2570:8B 
2578:0A 
2580:E8 
2588:35 
2590:FE 
2598:D3 
2540:48 
25A8:C9 
25B0:05 
25B8:09 
25C0:C8 
25C8:90 
25D0:9F 
25D8:C9 
25E0:20 
25E8: 6F 
25F0:11 
25F8:23 
2600:0E 
2608:10 
2610:F0 
2618:69 
2620:8A 
2628: 0A 
2630:8A 
2638:AD 
2640:09 
2648: 20 
2650:66 
2658:8B 
2660:C9 
2668:79 
2670:20 
2678:8C 
2680:30 
2688: 99 
2690:39 
2698:00 
26A0:0F 
26A8:F0 
26B0:BD 
26B8 : OA 
26C0:39 
26C8:C3 
26D0:39 
26D8:99 
26E0:8C 
26E8:1B 
26F0:35 
26F8:14 
2700:F0 
2708:F0 
2710:4C 
2718:20 


DE 


2€ 

















2720:C2 
2728:39 
2730:2F 
2738:BD 
2740:8E 
2748:36 
2750:05 
2758:75 
2760:04 
2768:26 
2770:62 
2778:C5 
2780:2F 
2788:4C 
2790:F0 
2798:2F 
27A0:0C 
27A8:A9 
27B0: 63 
27B8:0D 
27C0:2C 
27C8:2F 
27D0: 75 
27D8:07 
27E0:2C 
27E8:40 
27F0:6C 


2D 
4C 
1D 
75 
75 
30 
25 
2F 
25 
25 
2E 
20 
FO 
83 
EC 
8D 
FO 
76 
2F 
20 
68 
29 
2F 
20 
66 
39 
11 


27F8:2F E8 


2800:8D 
2808:A0 
2810:E8 
2818:75 
2820:BB 
2828:2E 
2830: 74 
2838:C3 
2840:78 
2848:0A 
2850:2F 
2858:2F 
2860:70 
2868 : 6D 
2870:CA 
2878:2E 
2880:2E 
2888:2E 
2890:8B 
2898: 00 
28A0:EE 
28A8:00 
28B0:0A 
28B8:8C 
28C0:68 
28C8 : 6D 
28D0:73 
28D8: 74 
28E0:20 
28E8:FF 
28F0:35 
28F8:FF 
2900:C0 
2908:F0 
2910:2E 
2918:4C 


35 
00 
C8 
2F 
8D 


2F 
2E 


FO 
DO 


2E 


25 


8D 
FA 
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Modifications Ultramacros 1.7 — 2.2 


Dans la nouvelle version US d'UltraMacros, un bug existant dans les versions 
précédentes a été corrigé. Ce bug ‘plantait’ Appleworks lorsque qu'une longue 
variable chaîne était manipulée pendant l'affichage du menu TimeOut (ceci 
pouvait se produire par exemple au ‘réveil’ d'une macro latente). 

Pour la correction dans la version française d'UltraMacros, faire les modifications 
suivantes dans le fichier ULTRA .SYSTEM. 


Octet CRaïne à remplacer par 
à rechercher 


S001479 00 BE 90 09 
S001B08 00 BE 90 09 
$001B1A 01 BE 91 09 
S001B23 00 BE 90 09 
S001C64 00 90 
$001C68 BE 09 


Correction du bug impression 
du Tableur 


Lors de l'impression sur disque d'un fichier Tableur ({DIF/ASCIT), si 
AppleWorks rencontre un problème lors de la création du fichier, il affiche, ce 
qui est logique, Impossible de commencer xxxxxXxXXXxXxx, Puis 
demande Recommencer ?. Si nous répondons Oui, il affiche dans tous les cas 
XXXXXXXXXxx existe déjà, Détruire l'ancien, ce qui est 
souvent absurde. 


Pour corriger ce bug, ü faut modifier SEG.MI de la manière suivante: 


Octet Chaine à remplacer par 
à rechercher 


$00F5ES 92 D4 


UltraMacros : un STEP programmable 


Lors de la mise au point de macros, il peut être commode de disposer 
temporairement du mode STEP. Un ‘poke’ bien choisi à l'adresse SDIEC peut 
activer ou désactiver le STEP : 


poke $dlec,$fe : active le STEP 
poke $dlec, $23 : désactive le STEP 


G 
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Philippe Matsumoto 


DHR-AGP regroupe plus d’une vingtaine d'instructions 
accessibles très simplement depuis l'Applesoft par 
l'ampersand &. Ces instructions forment un ensemble 
complet permettant une utilisation exhaustive des 
possibilités offertes par la double haute résolution, DHR. 
Certes, il existe déjà des programmes d’utilisation de la 
page DHR, mais DHR-AGP a de nombreux atouts qui font 
de lui un programme particulièrement intéressant. 


Ce programme n'utilise que 9 octets cn mémoire 
vive principale, jaissant libre l’ensemble de la zone de 
mémoire gérée par l’Applesoft. Les programmes Basic et 
en assembleur pourront rester aussi longs que si DHR-AGP 
était absent. 


Principales qualités 
de structure de DHR-AGP 


++ Il cst stocké et utilisé en mémoire auxiliaire ; son 
fichier source qui contient plus de 40Ko de commentaires 
cst ainsi un cxcellent exemple d'utilisation complète des 
commutateurs logiciels de FApple //. 

+ Ce programme ne monopolise pas l’utilisation de 
l’ampersand, ct tout autre programme s’en servant 
fonctionnera sans modilication. 

+ Ilest court : une moyenne de 150 octcts par nouvelle 
instruction acquise. 


DHR-AGP 
ses possibilités graphiques 


++ Instructions PLOT, BOX, inversions vidéo, affichage de 
tous les types de pages graphiques, passage de 40 à 80 
colonnes. 

e+ DHR-AGP permet de tirer meilleur parti des 
possibilités de mélanges de couleurs et surtout de création 
des différents niveaux de gris ; vous pouvez définir, puis 
utiliser vos propres mélanges de couleurs grâce à 
l'instruction p£rcoLoR. Outre les “huit” coulcurs du 
système, le programme vous offre donc huit coulcurs 
disponibles, redéfinissables sur la base d’un motif 
élémentaire de 2 fois 14 points (accès à plus de quatre 
milliards de motifs élémentaires possibles). 

+ Il comprend unc instruction de remplissage FILL AT 
x, y permettant de remplir dans n'importe quelle couleur 
toutes les figures quelle que soit leur complexité. Utilisée 


avec l'instruction de définition des couleurs, elle permet à 
tous les graphiques d'acquérir une finesse supplémentaire. 
+ Trois instructions complémentaires assurent une 
parfaite comptabilité entre le graphisme en HGR ct DHR. 
Elles pennettent entre autre de faire passer un dessin créé en 
HGR sur la page DHR, ct vice-versa. 

+ DHR-AGP vous offre deux pages DHR, de la même 
manière qu’il y a deux pages HGR. L'affichage de l’une et 
de l’autre est évidemment possible, ct on peut également en 
dupliquer une sur l’autre. 

+ DHR-AGP possède des instruction de sauvegarde et de 
chargement d’un graphisme sur la disquette (en le 
“compactant”). 


Utilisation 


Le lancement de DHR-AGP s'effectue par : 
BRUN DHRAGP.C, A$2000 


En cffet, DHRAGP a été assemblé à l'adresse 5800 mais, 
pour pouvoir l'utiliser sans crainte de détruire un 
programme Basic, il doit être chargé et exécuté à l'adresse 
$S2000 de la mémoire vive principale. Lc programme 
s'auto-implantera à l'adresse $880 de la mémoire auxiliaire, 
laissant de nouveau libre la mémoire principale, à 
l'exception des octets 56 à SB ct SFA à SFC qui nc doivent 
pas être détruits. 


Vorre programme utilisant les fonctions de DHRAGP 
devrait être lancé par un programme du style START.DHR 
listé ci-après. 


Sur la disquette Pom’s 43 


Vous y trouverez le programme de démonstration, l'objet 
cxécutable mais aussi Îles sources ProCODE avec 
commentaires. 


Liste des instructions 


éPLOT X,Y TO X2, Ya], [TO Xn, fn] 
Affichage du point de coordonnées (x, Y) puis de 
droites reliant les points successifs (X1, Y1) à 
{Xan, YA),dans la couleur courante. 


£SPLOT TO X,Y (TOM Ye) [TO Kh, Xn] 
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Idcntique à PLOT mais commence par relier Ie point 
(x, y) au point précédemment mémorisé dans le 


pointeur. 


£ENVERSE PLOT (FOI X,Y TO X1, Ya 

[TO Xn, Yn] 
Instruction PLOT [{TOj mais l’inversion vidéo 
remplace la couleur courante. 


&BOX X1,Y1 TO X2, Y2 
Dessine et remplit dans la couleur courante le rectangle 
dont le coin supérieur gauche cest (x1, Y1) et le coin 
inféricur droit (Xz, Yz)avec X2>=X14+7 C1 Yz2>Y1. 


&INVERSE BOX X1,YI1 TO X2, Y2 
Identique à BOX mais remplacement de la coulcur 
courante par l’inversion vidéo (permet une inversion 
vidéo particlle ou totale de l'écran). 


&FILL {[COLOR=Colj AT X,Y {(0<=col1<=15) 
Remplissage dans la couleur courante (ou la couleur 
Col siCOLOR=col cst précisé) de la partic de 
l'image contenant le point (X, Y}, délimités par des 
points allumés consécutifs ou les bords de l'écran. 
Cette instruction permet de remplir Loutes les figures, 
quelle que soit leur forine. 


&DEF COLOR=CoO1 TOA, B,C, D {8<=Col<=15) 
Redéfinition de la couleur Co1 aux valeurs À, B, Cet 
D (comprises entre 0 et 255). 
Selon le schéma classique de la définition des masques 
“4 couleur. 


— — 


14 x 2 points 


Motif res 


4 F2 de 
couleurs possibles 





&COLOR=Col (0<=Col<=15) 
La couicur Co1 devient couleur courante pour les ins- 
tructions PLOT, BOX et FILL. 


&AGP. HGR>DHR 
Recopic le graphisme de la page DHR. Chaque point 
initial HGR cst transformé en deux points juxtaposés 
sur la page DAR. Affichage de DAR. 


&AGP .DHR>TWO 


Divise la page DHR en deux parties : la moitié gauche 
est copiée sur la pagc AGR ct la moitié droite sur la 
pagc AGRz2. Affichage dela page AGR. 


&AGP . TWO>DHR 


Copie HGR sur la moitié gauche de la page DEAR, ct la 
page HGR2 sur la moitié droite. Instruction inverse de 
AGP.DHR>TWO. Affichage de DHR. 


Les trois instructions AGP .> assurent une parfaite 
comptabilité entre simple et double haute résolution. 
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&STORE 


Sauve la page DAR sur la page DHR2 virtuelle (ce 
procédé permet d'avoir deux pages DHR comme on a 
deux pagcs HGR). DHRZ est détruite. 


&RECALL 


Rappel de la page DHR sur la page DHR ou copie de la 
page DHR2 sur DER. 


&EXCHANGE 


Échange les deux pages DHR ct DHR2 entre elles. 
Permet l'affichage de DHR2. 


&SAVE "Nom" 
Sauve sur la disquette ic graphisme DEAR en la 
“compactant” : les octets inutiles ne sont pas sauvés, 
Unc page DHR prend alors 15 600 octets. Aucun 
système de traitement d'erreur n'est prévu. Le nom peut 
contenir des leures et des chiffres. 


&LOAD “Nom” 


Charge sur la pagc DHR Ie graphisme sauvé par 
€SAVE. 


&DHR [Text] 
Affichage de la page DHR avec 4 lignés de texte si 
TEXT cst précisé ct si la carte 88 colonnes étcndue cst 
active. 


&CLsS 


Effacc la page DAR et fixe le blanc 1 comme couleur 
courante (ct/ou la page HGR). 


&HGR [Text] 
Affichage à l'écran de la page HGR avec 4 lignes de 
texte, éventucllement. 


&HGR2 


Affichage de HGRz2. Ces instructions sont conseillées 
plutôt que les instructions du système. 


&TEXT Où 40 
Passage cn mode texte 40 colonnes 


&80 
Passage en mode texte 80 colonnes si la carte 80 
colonnes est active. Le couple £ 40/&80 permet des 
passages successifs à l'écran 40 ct 80 colonnes. 


£&.. {instruction Ampersand étendue) 
Permet l’utilisation d’autres programmes fonctionnant 
à partir de l’interpréteur &. En fait, & & appelle le 
programme qui se 1rouve à l'adresse contenue dans les 
vecteurs Ampersand avant le chargement par BRUN 
DHRAGP.C, AS$2000 de DHR-AGP. 








2] 





22 








Programme Start.dhr 


10 
20 


PRINT CHRS$S (4) “BRUNDHRAGP.C, AS2000 
PRINT CHRS (4]"-DEMONSTRATION 


Programme 


10 


16 


18 


21 


22 


24 


Demonstration 


LOMEM: 
PRINT : 
HRAGP 


24576: TEXT : PRINT CARS (4) "PR£3": 
YTAB 21: PRINT "DEMONSTRATION DE D 
INVERSE : PRINT SPC( 60): FRINT 
ÿ PRINT " %};: POKE 36,58: PRINT ” !:%: PRIN 

T SPC( 60);: NORMAL 

A$ = "Programme de demonstration se DHRAGP p 
ar P.M.": GOSUB 80:AS = "“$ DHR TEXT:6 CLS:T 
racé d'un quadrililage avec & BOX": GOSUB 80 
: € DHR TEXT : & CLS: & COLOR= 3: FOR I = 
O0 TO 154 STEP 77: & BOX0,I TO 550,I + 4: NE 
XT I 
FOR I = 
+158: NEXT I:A$ = 
Palette de couleurs": 
TO 15: & COLOR= I: GOSUB 78: 
+ 53,B + 69: NEXT 

A$ = “Exemgles de couleurs redefinissables à 
vec DEFCOLOR'": GOSUB 80 

I = INT { RND (1) * 16); GOSUB 78:C =  RND 
(1) * 256:D = RND (1) * 256; & COLOR= 8: 
& DEF COLOR= 8 TO D,C,C,D: & B0XA,B TO À 
+ 933,8 + 69: HF PEEK { - 16384) < 127 THEN 
18 

PI = 3.1416: & 
bes aâvec &PLOF": 


O0 TO 544 STEP 68: & BCXI,0 TO I + 9 
& COLOR=Col {0<=Col<=15) 
GOSUB 80: FOR I = 0 

& EOXA,B TO A 


COLOR= O:A$ = "Trace de cour 
GOSUB 80: 5 BOX282,0 TO 55 
9,159: £&g COLOR- 3: FOR I = OTO:IS:A = I * 
17.125:B = I * 9.938: £ PLOT 284 + A,0 TO 
558,B TO 558 - A,159 TO 284,159 - B TO 284 
+ A,0£: NEXT I 
& PLOT 462,100: FOR I = O TO 120: € PLOT 
TO 422 + 40 * ( SIN (I / 60 * PI) + COS !{ 
TSI % PT) 0014 20% {COST 60 + ET) 
= SIN (IT -Y 20-2YPT)j: NEXT 
AS = “Sauvegarde de cêtte page sur DHR2:4 ST 
ORE": GOSUB 80: & STORE :AS = “& CLS et tr 
äcé d'un cadre": GOSUB 80: & CLS: $ COLOR= 
3: FOR Æ = 0 TO, 12 STEP 2: A — 559 =v2 NI: 
Be 2 #.I:C = 159 = TI 
6 PLOT B,I TO:A,I TO A,C TO B,C TO B;I TO 
B + 1,1 TO B +1,C: & PLOT À - 1,1 TO À - 
1,C: NEXT I:AS$ = "Utilisatien 3e PLOT et FI 
LL'‘: GOSUB 80 
FOR I = 535 TO 25 STEP 
SIN (ET 7/20) 


= 55 $ PLOT TO I, 
* 15 + 60; NEXT :B = 76: GOSU 
B 76:B = 110: GOSUB 76: & PLOT 285,74 TO 2 
85,146: & FILL COLOR= 9 AT 99,74: & FILL CO 
LOR= 112 AT 99,109: & FILL COLOR= 14 AT 99,1 
45 


26 AS = ‘’Inversion vidéo d'uñe partie de l'écra 


n:£ INVERSEBOX'": GOSUB 80: FOR I = 1 TO 6: 

&  INVERSE BOX286,30 TO 534,80: FOR J =1T 
O 500: NEXT J,I:A$ = "Les graphismes sont p 
lus simples avec £&PLOT et 6FILL": GOSUB 80: 


£& COLOR= 3 


28 


30 


32 


34 


36 


38 


42 
70 


74 


76 


78 


80 


82 


À = 


AS = 


À = 





FOR 4 = 
5. #80: & 
TO'A + 23,;B; TO À 


300 TO 500 STEP 35:B = 


RNG (1) * 5 
PLOT À + 23,146 TO A,146 TO À,B 
+ 23,146 TO À + 31,140 TO 


A + 31,5 - 6 TO À + 23,B: & PLOT À,B TO À 
+ 8,B - 6 TO À + 31,B - 6 
& FILZ COLOR= 10 AT A + 9,B - 1: & FILL COL 
OR= 15 AT A + 9,B + l: & FILL COLOR= 9 AT À 
+ 25,B: £ COLOR= 3: NEXT : & PLOT 515,78 
TO 515,146: FOR I = 196 TO 80 STEP = 5: & 
BLOT 51351 TO 518;1: NEXT 
158: GOSUB 72:A = 284: GOSUB 72:A = 412: 
GCSUB 72:A$ = "Sarvegarde de ce dessin sur 
lé disguette": GOSUB 80: $ SAVE "DHRDESS" 
:AS = "Répoel du dessin qui se trouve en DH 
R2: &RECALL'": GOSUB 80: & RECALL 
“Rechergement du dessin sauvé: &LOAD'": 
GOSUB $0: & ZLOAD "DHRDESS":A$ = “Echanges 
entre les pages DHR et DAR2": GOSUB 80: FOR 
I = 1 TO 10: & EXCHANGE: FOR J = 1 TO 300: 
NEXT J,I:AS$S = “Division du dessin en deux 
parties HGR et HGR2'": GOSUB 80 
6 AGP.DHR > THO:AS = "Echanges entre les de 
ux moitiés HGR et HAGR2": GOSUB 80: FOR I = 
1 TO 5: GOSUB 70: & HGR2 : GOSUB 70: 64 HG 
R : NEXT 
TEXT : HOME : PRINT "Essais avec les comman 
des 640 et 480": FOR I = 1 TO 4: & 40: GOSU 
B 70: & 80: GOSUB ?0: NEXT : & AGP.TWO > DH 
R: & DHR TEXT : HOME : PRINT "** FIN DE LA 
DEMONSTRATION *r" 
IF PEEK ( - 16384) 
GOSUB 70: GOTO 40 
END 
FOR J = 1 TO 600: NEXT : RETURN 
& COLOR= 3: &4 PLOT A,35: FCR I = O TO 36: 
X = COS (I / 18 * PI) * 40 + A:Y = SIN [I 
/ 18 * PI) * 20 + 35: & PLOT TO X,Y: IF 
I / 12 = INT (I / 12) THEN € PLOT TO A, 
35: & PLOT X,Y 
NEXT : FOR I = O TO 2:C = 
£ FILL COLOR= C AT À - S,I 
: RETURN 
£& PLOT 25,99: 
RND (1j x 35: & 
3 RETURN 
{I - 8 * INT (I / 8)) 
T (I / 8) * 77 + 6: RETURN 
VTAB 21: #TAB 38: PRINT “Appuÿez sur une to 
uche pour continuer";:: GET C$: HTAB 38: PRI 
NT SPC( 40) 
VTAB 23: FOR I = 
;:1{5 PRINT LEFTS (* 
NEXT : RETURN 


< 127 THEN % EXCHANGE: 


RND (1) * 8 + 8: 
* 15 # 20: NEXT. 


FOR I = 25 TO 285 STEP 10:A 
PLOT TO I,B + A: NEXT 


* 68 + 12:B = IN 


54 TO 2 STEP - 1: POKE 36 
Me ANS 70 PAG en T) és 





Récapitulation Dhragp.C 


Après avoir saisi ces codes sous moniteur, 
vous les sauvegarder ez p ar : 


bsave dhragg.C, A$800, 


0800:4C 22 2C 8D 05 CO 20 38 08 


ES$14C3 


80 04 CO AS 8A 30 03 


0810:8D 00 CG AS DB 30 03 8D 56 CO ÀS #c 10 03 8D 55 


0820:C0 A9 60 85 FD 4C FA 00 00 
0830:00 00 00 00 FF FF 03 00 00 


00 00 00 00 00 00 00 
00 00 AS 5D 85 96 A9 








Pom's n° 43 














0840:13 85 97 A2 B7 A0 00 20 17 13 C9 Ar F0 76 C9 SE OCB0:EB AD 2B 08 8D 2E 08 AD 2C 08 8D 2F 08 20 C1 OA 
0850:D0 06 8D 38 08 4C 6A 08 38 AS B8 E9 01 85 88 A5 O0CC0:B9 37 OD 48 AD 31 08 85 96 AD 32 08 85 97 AD 28 
0860:B9 E9 00 85 B9 A9 00 8D 38 08 A5 B8 85 98 AS 89 0CD0:08 8D 2E 08 AD 29 08 8D 2F 08 20 C1 0A B9 30 OD 
0870:85 99 AO FF C8 B1 96 FO 2€ 84 3C A2 B1 A0 00 20 OCE0:8D 33 08 20 A1 0A A9 00 85 9F AE 2A 08 20 4B 0B 
0880:17 13 A4 3C D1 96 FO EC C8 B1 96 DO FBC8C8 C8 OCFO0:AD 32 08 49 01 8D 32 08 C9 55 DO 03 EE 31 08 AD 
0890:A5 98 85 B8 AS 99 85 B9 B1 96 DO D9 4C E4 08 C8 0D00:31 08 C5 96 90 18 AD 32 08 C5 97 DO 11 49 55 85 
08A0:B1 96 85 99 C8 B1 96 85 98 AD 18 CC 85 DA AD 1D 0D10:A5 20 A1 04 68 8D 33 08 AE 2A 08 4C 4B 0B A9 FF 
08B0:C0 85 DB AD 1C CO 85 DC 8D 01 CO 8D 57 CO 8D 54 0D20:8D 33 08 AG 232 08 49 55 85 A5 20 A1 OA 4C EA OC 
08C0:C0 6C 98 00 68 68 A2 B1 A0 00 20 17 13 38 AD 39 0D30:FF FE FC F8 F0 EO CO 01 03 07 OF 1F 3F 7F A2 F5 
08D0:08 E9 01 AA AD 3A 08 E9 00 48 82. 48 4C 09 08 A2 0D40:A0 E6 20 17 13 8A 29 OF 8D 36 08 60 A2 F5 A0 E6 
08E0:35 4C E6 08 A2 10 A9 D4 85 FF A9 12 85 FE A9 4C 0D50:20 i7 13 8A 29 OF C9 08 B0O 03 4C DF 08 48 A2 B7 
08F0:85 FD 8D 04 CO 4C FA 00 A2 B1 AO 00 20 17 13 C9 0D60:A0 00 20 17 13 C® C1 FO 04 68 4C E4 08 A9 00 85 
0900:CI FO 09 20 3B 09 20 28 09 4C 19 09 A2 B1 A0 00 0D70:A5 €8 20 A4 OA AO 00 84 18 22 F5 A0 E€ 20 17 13 
0910:20 17 13 20 28 09 20 3B 09 20 68 09 A2 B7 AO 00 0D80:A4 18 8A 91 AS C8 CO 04 DO ED 60 A2 B1 AO 00 20 
0920:20 17 13 C9 C1 F0 ES 60 AD 2B 08 8D 28 08 AD 2C 0D90:17 13 A9 03 8D 36 08 A2 3A A0 O0E 4C 06 DE A2 B1 
0930:08 8D 29 08 AD 2D 08 8D 24 08 60 A2 7B .40 DD 20 0DAO:A0 00 20 17 13 A2 47 A0 0E 4C 06 O0E A2 B1 A0 00 
0940:17 13 A2 52 A0 E7 20 17 13 G9 02 90 09 E0 03 4C 0DB0:20 17 13 A2 56 AO O0E 4C 06 OE A2 B1 AO 00 20 17 
0950:DF 08 CO 30 B0 F9 8D 2C 08 8C 2B 08 A2 F5 AO E6 0DC0:13 A2 80 AO 0E 20 0€ 0E 4C F3 OD 20 D7 OD AD 1A 
0960:20 17 13 EO CC 80 E8 8E 2D 08 60 AS 00 85 EF AD 0DD0:C0 10 01 60 4C 18 OC 42 B1 A0 00 20 17 13 A2 B4 
0970:29 08 CD 2C 08 90 13 FO 02 BO 08 AD 28 08 CD 28 0DE0:A0 O0E 4C 06 OE A2 BI A0 00 20 17 13 A2 FB A9 0E 
0980:08 BO 07 20 A1 O0B 49 FF 85 EF AD 2D 08 CD 24 08 0DF0:20 06 0E AD 1A C0 30 DE 4C D2 O0B A2 B1 AO 00 20 
0990:B0 0E A9 FF 85 5F AD 2A 08 38 ED 25 08 4C AB 09 0E00:17 13 A2 65 A# 0E 8E 28 OE 8C 29 O0E A2 60 BD 80 
09A0:A9 00 85 9F AD 2D 08 238 ED 24 08 85 3S AD 2B 08 0E10:1E 85 A5 85 .47 85 A9 18 BD 40 iF 85 A6 69 20 85 
09B0:38 ER 28 08 85 54 AD 2C 08 ED 29 08 85 9B A9 00 0E20:A8 69 20 85 AA .40 27 20 00 00 88 10 FA EO 60 8A 
09C0:85 9C 85 9D 85 9E AD 28 08 8D 2E 08 AD 29 08 8D 0E30:E9 CO 49 FF Az E0 C0 DO D5 60 .A9 00 91 A5 8D 55 
09D0:2F 08 20 98 OA ZE 2A 08 8E 30 08 20 4B 0B AD 2F 0E40:C0 91 A5 8D 54 CO €0 B1 AS 91 A7 8D 55 CO BI A5 
09E0:08 CD 2C 08 DO 11 AD 2E 08 CD 2B 08 DO 09 AD 2D 0E50:8D 54 CO 91 A9 60 B1 A7 91 AS BI A9 8D 55 CO 91 
09F0:08 8D 30 08 4C 4B 0B A3 01 18 6D 2E 08 8D 2E 08 0E60:A5 8D 54 CO 60 8D 55 CC B1 AS 48 B1 A9 91 A5 68 
0A00:AD 2F 08 69 00 8D 2F 08 20 92 OA A5 9C 18 65 99 0E70:91 A9 B1 A7 48 8D 54 CC B1 AS 91 A7 68 91 AS 60 
0A10:85 9C AS 9D 69 00 85 9D A5 9D C5 9B FO 04 90 IA 0E80:B1 AS 85 98 A9 00 85 9e 85 97 86 99 A2 08 06 98 
0A20:B0 06 A5 9C C5 9A 90 12 AS 9C 38 E5 9A 85 9C 45 0E90:08 26 96 26 97 28 26 9€ 26 97 CA DO F1 06 96 26 
0A30:9D ES 9B 85 9D £€ SE 4C 18 OA A6 9E A5 9B 424 85 0EA0:97 66 96 A5 97 91 A5 A5 96 8D 55 CO 91 AS 8D 54 
0A40:A9 A5 9A 6A 85 A8 A3 C5 9D F0 05 B0 OA 4C 57 0EB0:CO0 A6 99 60 .A0 27 84 96 AD C7 OE 49 01 8D C7 0E 
0A50:0A A5 A8 C5 9C B0 01 E8 8A .a4 9F F0 0B 85 A5 AD 0EC0:98 4A 18 69 14 A8 8D 55 C0 Bi A5 8D 54 CO 8D 04 
08460:2A 08 38 ES A5 4C 6C OA 18 6D 2A 08 AE 30 08 8D 0EDO:CO0 A4 96 91 A7 8D 05 C0 88 10 C8 A0 27 84 96 AD 
0A70:30 08 20 4B 0B A5 2F 08 CD 2C 08 D0 12 AD 2E 08 OEEO:EB 0E 49 01 8D ER 0E 98 4A A8 8D 55 CO B1 AS 8D 
0A80:CD 2B 08 DO 0 AS Er C9 FF DO 03 20 A: 0B 60 4C 0EF0:54 CO A4 96 9ï AS 88 10 E4 C8 60 AO 00 84 96 AD 
0A90:F7 09 20 00 C2 4C 32 OA 20 CI OA P9 9A 0B 8D 33 0F00:0F OF 49 01 8D OF OF B1 AS 48 98 4A A8 68 8D 54 
0AA0:08 AD 36 08 04 9A 18 €5 25 69 E2 85 A5 A3 00 A8 0F10:C0 91 A5 8D 54 CO 44 96 C8 C0 28 DO E0 86 9A A2 
0AB0:69 13 85 A6 B: A5 8D 34 08 C8 C8 B1 A5 8D 35 08 0F20:54 AO 0F 20 5D 0F 4€ 9A AO 00 84 96 AD 40 Or 49 
0AC0:60 A0 10 AD 2E 06 85 A5 AD 2F 08 85 A6 2S 00 85 0F30:01 8D 40 OF 20 C$ 00 48 98 44 18 69 14 A8 68 8D 
0AD0:AA 26 A9 88 30 :2 06 AS 26 A6 26 AA 38 A5 AA E9 0F40:54 C0 91 AS 8D 54 C0 44 96 C8 C0 28 D0 DC 20 51 
0AE0:07 90 EE 85 A4 4C D1 SA 45 A A6 A9 A8 8D 37 08 0F50:13 A0 00 60 8D 02 CO BI A} 8D 03 CO 60 8E 69 OF 
0AF0:8A 4A 8D 31 08 8A 23 01 85 A5 43 55 8D 32 08 60 0F60:8C 6A OF 20 45 13 AO 5B B9 00 00 99 C9 00 88 10 
OBOO:EE 37 08 AD 37 08 A8 C9 07 DO 15 A9 00 8D 37 08 0F70:F7 60 4C E4 08 A2 B1 AS 00 20 17 13 C9 22 DO F2 
0B10:A8 AD 32 08 49 01 8D 32 08 C3 55 DO 03 EE 31 0€ 0F80:A0 05 84 3C A2 B1 AO 00 20 17 13 A4 3C C9 5B B0O 
0B20:AD 32 08 29 01 49 01 85 A5 50 CE 37 08 AD 37 08 O0F90:E1 C9 41 90 DC 09 80 59 00 BC C8 84 3C A2 B1 A0 
0B30:A8 10 ED A9 06 8D 37 08 A8 AD 32 08 49 01 8D 32 0OFAO:00 20 17 13 A4 32 C9 22 F0 C8 C9 30 90 C4 C9 3A 
0B40:08 C9 55 FO DB CE 31 08 4C 20 0B AD 32 08 8D 68 0FB0:B0 DB 4C 95 OF 98 8D CD 0F A2 Bl A0 00 20 17 13 
0B50:0B BD 80 1E 85 18 BD 40 1F 85 19 8A 29 01 A8 AD OFCO:60 £E CA OF 8C CB OF A0 00 B9 00 00 99 00 BC C8 
0B60:33 08 39 34 08 85 1A AC 31 08 8D 54 CO AD 38 08 0FDO0:C9 8D D0 F5 £0 C2 CC CF C1 C4 AC C1 A4 B4 BO B0 
0B70:r0 08 B1 18 4D 33 08 4C 83 GB A9 FF 4D 33 08 31 0FE0:B0 8D C2 D3 Ci D6 C5 AC CJ A4 B4 B0 B0 B0 AC CC 
0B80:18 05 1A 91 18 8D 54 CO EC 30 08 FO OC AS 9F DO OFF0:B1 B5 B3 B6 B0 8D AO 04 B9 D5 OF 99 00 BC 88 10 
0B90:04 E8 4C 51 0B CA 4C 51 02 €0 01 02 04 08 10 20 1000:F7 20 75 OF A2 DA AO OF 20 C1 OF 20 71 10 A2 03 
0BA0:40 A0 02 B3 2B 08 #8 B9 28 08 99 2B 08 68 99 28 1010:.A0 BE 20 17 13 20 2€ 11 A2 O0D"AO0 11 20 06 0E 4C 
0BB0:08 88 10 EF 60 A2 B1 A0 00 20 17 13 AC 52 CO C9 1020:5C 10 A0 04 B9 E2 ©0F 99 00 BC 88 10 F7? 20 75 OF 
0BC0:89 FO 01 60 AD 53 cO A2 B1 A0 00 20 17 13 60 20 1030:A2 E7 A0 OF 20 C? OF 20 7} 10 20 2C 11 A2 EA A0 
0BD0:85 0B AD 5E CO AD 52 CO A9 20 85 DC 85 E6 A9 80 1040:10 20 06 0E A2 03 A0 BE 20 17 13 4C 5C 10 A2 B1 
0BE0:85 DA 85 DB AC 1E C2 30 6E 8D OD CO 8D 52 CO 60 1050:A0 00 20 17 13 42 C2 A0 :0 4C 9B :0 20 55 10 8 
0BF0:A9 00 85 DA 8D 51 CO 8D 5F CO 85 DC 60 A2 BI A0 1060:04 C0 B9 00 BC 99 00 02 88 DO F7 8D 05 CO 4C 51 
0C00:00 20 17 13 20 FO O0B AD 1E CO 30 04 8D OC CO 60 1070:13 A2 D3 A0 10 20 5D OF A9 02 85 97 AO 00 84 96 
0C10:A9 11 4C SE OC 20 B5S 0B 345 20 85 DC 85 E6 A9 00 1080:B9 00 BC 48 20 C9 00 99 00 BC 68 8D 04 CO 99 00 
0C20:85 DA A9 80 85 DB 8D 50 CO 8D 5F C0 AD 1E CO 30 1090:02 8D 05 CO 88 DO E9 A2 C9 A0 10 n9 00 85 96 85 
0C30:03 8D OC CO 60 A2 B1 30 00 20 17 13 A9 80 85 DC 10A0:98 A9 40 85 97 A9 80 85 99 8E B2 10 8C B3 10 A0 
0C40:A9 40 85 E6 8D 52 CO 20 07 OC 4C 1E OC A2 BI A0 10B0:00 20 00 00 88 DO FA E6 99 E6 97 AS 97 C9 7C DO 
0C50:00 20 17 13 20 FO O0B AD 1E C0 10 BO A9 12 8D 00 10CO0:EE 60 8D 04 CO B1 98 91 96 8D 05 c0O 60 20 C9 00 
0C60:C0 A2 ED A0 FD 20 17 13 8D 01 CO €0 A2 81 AO 00 10D0:91 98 60 £D 02 CO B1 96 8D 03 CO 60 A9 28 18 65 
0C70:20 17 13 20 3B 05 20 28 09 42 B7 AO 00 20 17 13 10E0:96 85 96 A5 97 69 00 85 97 60 8D 04 CO B1 AS 91 
0C80:C9 C1 F0 03 4C E4 08 A2 81 A0 00 20 17 13 20 3B 10F0:96 88 10 F9 20 DC 10 AO 27 8D 55 CO B1 A5 912 96 
0C90:09 AD 2D 08 8D 30 08 CD 2A 08 B0 03 4C DF 08 AD 1100:88 10 F9 8D 54 CO 8D 05 CO C8 4C DC 10 20 C9 00 
O0CA0:2C 08 CD 29 08 90 F5 D0 08 AD 2B 08 CD 28 08 90 1110:91 AS 88 10 F6 20 DE 10 AO 27 20 C9 00 D 55 CO 
Pom’s n° 43 

















1120:91 AS 8D 54 CO 88 10 F2 C8 4C DC 10 A9 40 85 97 1300:03 C6 9A 88 8A 99 80 15 AD 28 08 9$ 80 1C AD 29 
1130:A9 00 85 96 60 A2 B1 A0 00 20 17 13 C9 C5 FO 15 1310:08 9853 80 15 60 00 00 8E 3D 13 8C 3E 13 48 A2 39 
1140:C9 AG DO 0E 20 3E OD A2 B7 A0 00 20 17 13 C9 C5 1320:A0 13 20 5D OF 8D 04 C0 68 4C CS 00 48 98 48 20 
1150:F0 03 4C Eg 08 A2 B1 A0 00 20 17 13 20 3B 09 8E 1330:51 13 68 A8 68 8D 05 CO 60 8D 02 CO 20 00 00 8p 
1160:30 08 AD 2B 08 8D 2E 08 AD 2C 08 8D 2F 08 A9 00 1340:03 CO 4C 2C 13 A0 0B 59 C9 00 99 80 1B 88 10 F7 
1170:85 9A 20 98 OA AE 30 08 BD 80 1E 85 18 BD 40 1F 1350:60 A0 0B B9 80 1B 99 C9 00 88 10 F7 60 8D 00 08 
1180:85 19 E8 BD 80 1E 85 1C BD 40 1F 85 1D CA CA BD 1360:F8 A0 00 8D 3E 38 A0 09 OD 4C A8 00 OD 9E A7 00 
1190:80 1E 85 1A BD 40 1Fr 85 1= A9 00 8D 16 13 8D 15 1370:0D AC 42 4F 58 00 OC 6C 45 58 43 48 41 4E 47 45 
11A0:13 AD 2E 08 8D 28 08 AD 2F 08 8D 29 08 20 2A 0B 1380:00 8D FB 43 4C 53 00 OD 8B 46 49 4C 4C 00 11 35 
11B0:B9 9A 0B 8D 33 08 A9 18 20 AB 12 DO 14 38 AD 28 1390:89 00 OB FD 91 00 0C 15 90 00 OC 35 34 30 00 0B 
11C0:08 E9 01 8D 28 08 AD 29 08 E9 00 8D 29 08 4C AD 13A0:FD 38 30 00 OC 4D 41 47 50 2E 44 48 52 CF 54 57 
11D0:11 20 00 0B B9 9A 0B 8D 33 08 AD 30 08 29 01 85 13B0:4F 00 OD CB 41 47 50 2# 54 57 4F CF 44 48 52 00 
11E0:A5 20 A1 CA A9 18 20 A8 12 D0 29 20 $F 12 29 CE 13C0:0D ES 41 47 50 2E 91 CF 44 48 52 00 OD BA 44 48 
11F0:12 AD 30 08 29 01 49 01 85 A5 20 A1 OA 20 30 12 13D0:52 00 0B CF B7 00 10 22 B6 00 OF F6 45 52 52 00 
1200:A9 01 18 6D 28 08 8D 28 08 AD 29 08 69 00 8D 29 13E0:10 4E 00 00 00 00 2A 55 2A 55 55 2A 55 2A 7F 7F 
1210:08 4C D1 11 A4 9A DO 01 60 B9 80 1B 8D 30 08 B9 13F0:7F 7F 80 80 80 80 £A D5 AA D5 D5 AA D5 AA FF FF 
1220:80 1C 8D 2E 08 B9 80 1D 8D 2F 08 C6 9A 4C 72 11 1400:FF FF 36 2A 2A 36 08 06 41 41 FE 3F 3F FE CA 29 
1230:20 9F 12 AD 30 08 29 01 49 01 A8 B9 34 08 85 IE 1410:29 CA C4 28 28 C4 70 AD AD 70 EA 57 57 EA 2A 55 
1240:AF 30 08 FO 2C A9 1A 20 AB 12 F0 08 A9 00 8D 16 1420:55 2A A2 00 AO 03 B9 B7 2C 85 06 A9 20 85 08 A5 
1250:13 4C 71 12 AD 16 13 DO 18 AS 1E 2D 33 08 F0 EC 1430:08 85 07 A5 06 8D 05 CO SD 80 1iE AS 07 9D 40 1F 
1260:AD 16 13 DO 0C A9 01 8D 16 13 CA 20 FB 12 AE 30 1440:8D 04 CO A9 04 18 65 07 85 07 E8 8A 29 07 DO E3 
1270:08 EO BF F0 29 A9 1C 20 AB 12 F0 08 A9 00 8D 15 1450:A5 06 49 80 85 06 8A 29 OF DO D4 E6 08 A5 08 C9 
1280:13 4C 9E 12 AD 15 13 DO 15 A5 1E 2D 33 08 FO EC 1460:24 DO CC 88 DO CO A0 05 B5 BB 2€ 99 0€ 00 B9 C1 
1290:AD 15 13 D0 09 A9 01 8D 15 13 E8 20 FB 12 60 AD 1470:2C 99 FA 00 88 10 Fi A9 08 85 A1 A9 00 85 A0 85 
12A0:32 08 29 01 49 01 85 A5 4C Al OA AC 31 08 30 19 1480:A2 A9 20 85 A3 8D 05 CS AO 0© BI A2 91 A@ 88 DO 
12B0:C0 28 F0 15 8D C1 12 AD 32 08 8D BE 12 8D 54 CO 1490:F9 A5 A3 C9 2C F0 07 E6 Al E6 A3 4C 88 2C AD F6 
12C0:B1 00 8D 54 CO 2D 33 08 60 A9 FF 4C C5 12 AD 30 14A0:03 8D 39 08 AD F7 03 85 3A 28 8D 04 CO A2 06 8E 
12D0:08 29 01 A8 83 3% 08 85 iE AD 32 08 8D EA 12 A5 14B0:F6 03 A2 00 8E F7 93 69 50 28 00 8D 03 CO 4€ 03 
12E0:1E 2D 33 08 85 1F AC 31 08 8D 54 CO A9 FF 4D 33 14C0:08 8Db 02 CO 

12F0:08 31 18 05 1F 91 18 8n 54 CO 60 E6 3A A4 9A DO 





Source DHRAGP Er BNE NORMAL STA SCO54 


ORG $800 STA INVERSE JMP (50098) 
Assembleur ProCODE :------ JMP  INVVIDEO DEUXAMP PLA 
JMP  STARTUP+51800 NORMAL SEC £LA 
VCTAMPER = $03F6 DEBUT STA S$C00S LDA SB8 JSL CHRGET 
CHRGET = $00B1 JSR DHRAGE SBC £I SEC 
CHRGOT = $00B7 GOTOBASC STA SC004 STA SB8 LDA  AMPERS2 
DTHGRI = $1F80 LDA  SDA LDA SB9 £BC £1 
DTHGR2 = S1F40 BMI STORES89 SBC £0 TAX 
LIGPILE = $1B80 STA SC000 STA SB9 LDA  AMPERS2+1 
ABSPILEB = S1C80 STORES80 LLA SDB LDA £9 SBC £0 
ABSPILEH = $1D80 BMI HIRES STA INVERSE PKHA 
Pesraitmes = es mans ss > STA $CO56 INYVIDEO COPY SB8, 588 TXA 
20 0 HIRES LDA SDC LDY £SFF PHA 
copy MAC BPL PAGEZ NEXTCAR INY JP  GOTOBASC 
LDA .0 STA  SCO55 NEXTCAR2 LDA ($96),Y QERROR  EDX £53 
STA 1 PAGE2 LDA £560 BEQ PART JMP  ERROR 
LDA .0s1 STA $FD JSLR CHRGET SERROR  LDX E16 
STA .1l#1 JMP SFA CMP  (S96),Y ERROR LDA £$D04 
EOW VATLAGIES (=== 2 BEQ NEXTCAR STA SFF 
ADD MAC ABSDEP HEX 0000 NOEND INY LDA £512 
c£c LIGDEP HEX 00 LDA (596),Y STA $FE 
ADC .0 ABSARR HEX 0000 BNE  NOEND LDA ëS4C 
EOM LIGARR HEX 00 INY STA $FD 
SUB MAC ABS HEX 0000 ENY STA  5C004 
SEC LIG HEX 00 ENX UMP SFA 
SBC .0 ABSY HEX 00 COPY $98,$B8 Ac PLOTpP==s=se=2-seesees--esess 4 
ECM ABSRAM HEX 00 LDA (S96},Y CMDPLOT JSL CHRGET 
HGRM MAC MASK HEX 00 BNE NEXTCAR2 CMP £SC1 
LDA DTHGRI,X COLMASKO HEX FF JMP  SERROR BEQ PLOTTO 
STA .0 COLMASKI HEX FF PART INY JSR LECTURE 
LDA  DTHGR2, X NBCOLOR HEX 03 LDA (596],Y JSR DUPLICAT 
STA .Os1 MASKNB HEX 00 STA 599 JMP  PLOT 
EOH INVERSE HEX 00 INY PLOTTO JSL CHRGET 
JSL MAC AMPERS2 MHEX 0000 LDA ($96),Y JSR DUPLICAT 
LDX £e,0 #< PROGRAMME DHR-AGP >------ STA $98 USR LECTURE 
LDY £>.0 DHRAGP LDA £<TABLE LDA  SC018 PLOT JSR TRACE 
JSR JSRINTER STA 596 STA SDA JSL CHRGOT 
EOM LDA £>TABLE LDA SCO1D CMP £5SC1 
JSLR MAC STA 597 STA  SDB 8EQ PLOTTO 
STY $3C JSL CHRGOT LDA SCOIC RTS 
JSL .0 CMP E£SAF STA $DC AS TEU Se an mien ee ten e ieUe > 
LDY S3C BEQ DEUXAMP STA SCO01 DUPLICAT COPY ABSARR,ABSDEP 
ECM CMP £S9E STA S$CO57 LDA LIGARR 
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LIGDEP 


STEST2 
LECTURE $DD?1 
$E7:2 
CMP  £2 
TDRDOK 
TESTXB 
QERROR 
£$39 
PLERROR 
ABSARRri 
ABSARR 
SE6F'5 
£192 
PLERROR 
LIGARR 


SSUB 


PLERROR 
TESTX8 


ORDOK 


DIVFAF 


SEE 
ABSDEP +! 
ABSARR+I 
NO£XCHG 
TESTFEX 
ECHANG 
ABSARR 
A3SDEP 
HOEXCHG 
EXC 

£L$FF 

SEF 
LIGARR 
LIGDEP 
SENSP2S 
L$FF 

59F 
LIGDEP 
LIGARR 
PLDEBQT 
£0 

$9F' 
LIGARR 
LIGDEP 
$99 
ABSARR 
ASSDEP 
$9A 
ABSARR+! 
ABSDEP +1 
$38 

LOA £Q 

$ssc 

$90 

$9E 

CCPY ABSDEP, ABS 
CALMSK 
LIGDEP 
LIG 

VLIN 
ABS+1 
ABSARR+1 
PLSUITE 
ABS 
ABSARR 
PLSUITE 
LIGARR 
LIG 

VLIN 

LDA £i 

ABS 

ABS 
ABS+1 

£0 

AB:+] 
CALISXIN 
Sgc 

$99 

$gc 

$9D 

ARC E0 

$9D 

$9D 

$98 


TESTP2 
TESTFEX 


ZNCREM 


ÉCHANG SIVEIN 


NOEXCHG 


NOTNEG 
NEGYES 


SENSPOS 


PLDEBUT 


PLOTF'IN 
SUITE 
CALMSKIN 


CALMSK 
CALMSKI 


CALCOLM 
CALCOLMA 


PLSUITE 


mm = 


D1IV7 


DIVST 


$TESTI 


B£Q STEST2 
BCC DIvVEAZ 
8CS Ssua 

LDA $3C 

CMP $SA 

8CC DIVFAF 

LDA S9C 

SUB $9A 

STA Sc 

LDA S$9D 

SBC $65B 

STA $SD 

INC $9E 

JP  $STESTI 
LDX $$SE 

LDA $98 

LSR 

STA $AS 

LDA S$6A 

ROR 

STA $A8 

LDA $AS 

CMP  $SD 

BEQO TESTP2 
8CS DIVEIN 
JIP  INCRENM 
LDA $A8 

CMP $C 

8CS DIVFI: 
INXx 

TXA 

LOY $5F 

BER NOTNEG 
STA $AS 

LDA  LIGDEP 
SUB $AS 

JMP NEGYES 
ADD LIGDEIF 
LOX LIG 

STA £ZIG 

JSR VLIN 
LCA ASS-1 
CMP. ABSARR+iI 
BNE SUITE 
LDA ABS 

CNMP  ABSARR 
BNE SUITE 
LDA $Er 

CHE  E£SFF 
BNE PLOTFIN 
JSR EXC 

ATS 

JMP  PLSUITE 
JSR DIVIINC 
JME  CALMSKI 
JSR DIV7 
LDA BITSMSK, Y 
STA MASK 
LDA NBCOLOK 
ASL 

ASL 

ADD 5$A5 

ADC  £<PALETTE 
STA  $AS 

LDA £0 

TAY 

ADC £>FALETTE 
STA $A6 

LDA (SA5),Y 
STA COLMASKO 
INY 

INY 

LDA (SAS, 
STA COLMASKI 
RTS 

LDY £16 
COPY A85,$A5 
LOA £0 

STA $AA 

ROL $A9 

DEY 
BMI DIVOCK 
ASL $A5 
ROL $A6 


> 


DIVOK 


DiVIINC 


D?7INCFIN 


Div7DEC 


XVLRAM 


VIDHORM 


VIDINV 


NEG 


STA 


$AA 


$AA 
£7 
DIVST 
SAA 
DIVST 


SAA 
$49 


MASKNB 


ABSY 


£1 

SAS 
£$S5 
ABSRAM 


MASKNB 
MASKN'8 


£7 
DIINCFIN 
£0 
HASKNG 


ABSRAM 
£i 
ABSRAN 
£555 
D7INCIIN 
ABSY 
ABSRAM 
£1 

£1 

Sas 


MASKNS 
IHASKNS 


D?INCFIN 
£6 
MASKNB 


ABSRAM 

£1 
ABSRAMH 
É$55 
DIINCFIN 
ABSY 
DYINCFIN 


ABSRAMH 
XULRAM+i 
$18 


£1 


MASK 
COLMASKO, Y 
$iA 
ABSY 
Sc054 
INVERSÉE 
VIDNORM 
{4$18),r 
MASK 
VIDINV 
£SFF 
ASK 


VLRET 


BITMSK 


= 
EXC 
EXCLOCP 


*< DHR TEXT > 


MIXED 


MIXEDSW 


DHR 
DHRGOT 


TXT93000T 


IMPOSS 


TEXTIOCL 


HGR2SUIT 


BGRC8A 


FGR2 


TEXT80 


TXT80GOT 


RTS 


JSL 


VLI 


01020408102040 


£2 
ABSARR, Y 


ABSDEP, Y 
ABSARR, Y 


ABSDEP, Y 


EXCLeeP 





CHRGET 
$ci52 
£589 
MIXEDSW 


$scos3 
CHRGET 


$COIE 


SC00D 


CHRGET 
TEXT 
$coliE£ 
TEXT40CL 
$cooc 


£17 
COLONNES 


$DA 
£$80 
$D5 
$Cc050 
$co5F 
$COIE 
HGRC8A 
$cO00C 


CHRGET 
£$80 

$pC 

£$40 

$E6 
$co52 
TXT40GOT 
HGR2SDIT 


CHRGET 
TEXT 
$SCOIE 
IMPOSS 
£16 
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LDA $RAM2+1 
COLONNES STA SC000 COLROK FA RTS £OR €! 
JSL $SFDED JSL CHRGOT CLSERG LCA E0 STA  SRAM2:I 
STA S$C001 CHF  £SCI STA 4(5A5),Y TYA 
RTS BEQ COLROK2 STA $C055 LER 
FTDONAEE "TEST RRN TT Mérrn FLA STA (SA5},Y TAY 
B80x JSL CHRGET JMP  SERKIKR STA $c054 SRAM2 STA $C055 
JSR LECTURE COLROK2 DA £G RTS LDA ($AS),Y 
JSR DUPLICAT STA SAS STOREPRG LDA ($A5),Y STA SC054 
JSL CHR@OT ELA STA (SA?),Y LDY S596 
CNP £$C1 JSR CALCOLMA STA $C055 STA (SAS), Y 
BEC BOXTO LDY £0 LDA  ($AS5),Y DEY 
JMP  SERROR MSUIVANT STY 516 STA $C054 BEL  SPART2 
BOXTO JSL CHRGET JSL S&Er5 STA ($A9I,Y INY 
JSR LECTURE LDY sis RTS RTS 
LDA  LIGARR TXA RECLLPRG LDA 4(1$A7),Y PRG2DHR LDOY £0 
STA LIG STA ($ASJ,Y STA 4$A5),Y $PARTI STY 596 
CMP  L{GDEP INY LOA (59), Y LDA SRAMI+1 
BCS BOX1 CPY Ed STA $C055 EOR £1 
BOXERROR JMP  QERROR BNE  MSUIVANT STA (SAS), Y STA  S$RAMI+1 
Box LDA ABSARR+]I RTS STA SC0S4 LDA ($35),Y 
CP ABSDEP+1 ébsssene Set sons RTS PHA 
8CC BOXERROR CLS JSL CHRGET EXCPRG  STA $C055 TYA 
BNE S0Xx2 LDA £3 LDA (SAS), Y LSR 
LDA  ABSARR STA  NBCOLOR PHA TAY 
CMP ABSDEP LDX  £<CLSPRG LOA (S$A9,Y ELA 
BCC BOXERROR LDY £>CLSPRG STA ($SASJ,Y SRANI STA $C054 
BOX2 COPY ABSARR, ABS JMP  TRANSFRT PLA STA ($AS),Y 
JSR DIV? STORE JSL CHRGET STA (SA9I,Y STA $cO54 
LOA BOXMSK2, Y LDX  £<STOREPRG LDA ($A7/,Y LOY $96 
FE LDY £>STOREPRG PHA Z&Y 
LDA ABSY JHP  TRANSERT STA $C054 CEY £40 
STA $96 RÉCALL JSL CHRGET LDA (SA5),Y BNE  SPARTI 
LDA ABSKAM LDX £<RECLLPRG STA (SA7),Y STX S3A 
STA 597 LOY 2>RECLLPRG PLA LDX  £READHGR2 
COPY ABSDEP,ABS JÆ  TRAUSERT STA 4{$AS5),Y LDY  £>RERDHGR2 
JSR O1IV7 AGPEGDER FSL CASGET RTS JSR C9ISTRING 
LDA BOXMSKi, Y LDX E<PRGHGDH PRGHGDH LDA (S$ASJ),Y LDX S$S9A 
STA MASK LDY £SERSRSDH STA 598 210Y £0 
JSR CALCOLM JSR TRANSÉRT LOA EC SPARTZ STY $96 
LDA £0 JM  AGF2DHRC STA 596 LDA SRAM2+i 
STA S9E AGEDHR2 SR AGPDER2A STA $97 EOR El 
REBOX  LDX LIGDEP LDA SCG:A STX $99 STA  SRAM2+1 
JSR  VLIN GEL AGPDHR2B LOX £8 USR 5C9 
LDA ABSRAM AGP2DHR3 RTS $1 AS2 598 PHA 
EOR £1 AGPDHR2B JMP  HGRGOT PHP TYA 
STA ABSRAM AGPDHR2A JSL CHRGET ROL $96 LSR 
CMP £5$55 LDX  E<PRGDHR2 ROL 597 CrC 
BNE BOXTÈST LDY  £>PRGDHRZ PLP ADC £20 
INC  ABSY JMP TRANSPFRT ROL $96 TAY 
BSOXIEST LDA ABSY AGP2DHR JSL CHRGET ROL 597 PLA 
cup 596 LDX  £<PRGZDHR DEX SRAUMZ STA $C#S54 
BCC BOXCONT LDY £>PRGZDHR BNE $1 STA (SAS),Y 
LDA  ABSRAM JSR TRANSFRT ASL $96 STA $c654 
CNP 597 AGP2DHRC LDA S$COIA ROL $97 LDY $96 
BNE  BOXCONT BMI  AGP2DHRE ROR 596 INY 
EOR £$55 JMP  DHRGOT LOA 597 CEY 4£40 
STA $AS EXCHANGE JSL  CHRGET STA ($ASJ,Y BNE  SPART2 
JSR  CALCOLM LDX  E<EXCPRG LDA $96 USR  C$LOAD 
PLA LDY  £>EXCPRG STA $CO05£ LDY £0 
STA MASK TRANS£ERT STX TRADRAI STA ($AS5), Y RTS 
LDX LIGDEP STY  TRACR+2 STA $C054 READHGR2 STA  $C002 
JME VLIN LDX £9€ LDX 599 EDA  ($SA7),Y 
BOXCONT LDA £SFF TRLOOP  LDA DTAGRI,X RTS STA $C003 
STA MASK STA SA5 PRGDHR2 LDY £39 RTS 
LDA  ABSRAM STA SAT SPARTI STY 596 CISTRING STX CSSTRADR#1I 
EOR £5$555 STA SA9 LDA SRAHI-1 STY CISTRADR:2 
STA SAS CLC EOR E£1 JSR COISAVE 
JSR CALCOLW LDA DTHGR2, X STA SRANI+I LOY £ii 
JMP  R&BOX STA 5A6 TYA C9ISTRADR LSA S$0009, Y 
BOXMSKI1 HEX FFFEFCF8F0E0CO A2C £520 LSR ETA $C9,7Y 
BOXMSK2 HEX 0103070FIF3F7F STA SA CLC DEY 
#< COLOR Dem ADC 2526 ADC £20 BPL CS9STRADR 
COLOR JSL $E6FS5 STA SARA TAY RTS 
TXA LDY 239 SRAMI STA $COSS #< SAVE et LOAD >-————------. 
AND EI5 ‘’RADR JSR $G000 LDA (S$A5),Y NAMEERR JMP  SERROR 
| STA NBCOLOR DEY STA Sc054 NAME JS5L  CHRGET 
| RTS 8PL  TRADR STA $CO004 CMP £34 
eme =. > CEX 296 LDY 596 BNE  NAMEERR 
DEFCOLOR JSL S$E6F5 TXA STA  (S$A7),Y LDY £5 
TXA S8Cc £192 STA S$C005 JSLR CHRGET 
AND £15 E@R £255 DEY NAMELETT CMP £91 
CMP £8 TAX BbL SPARTI BCS NAMEERR 
BCS  COLROK CPX £152 LDY £33 CHP  £65 
JMP  QERROR BNE TRLOSP SPART2 STY 596 23CC NAMCERR 
EE RE CARPE  — —— — 
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NAMEENR  DRA 
STA 
INY 
JSLR 
CMP 
BEC 


NAMÉFIN TYA 


NAMEADR STX 


NAMELOOP LDA 
NAMEFLG STA 


LOADDT 45C 
LOADDATA ASC 


SAVEDT ASC 
SAVEBATA ASC 


ERR JSL 
RCL4000 LDX 


JMP 
RCL40002Z JSR 


£$80 
SB8C00,Y 


CHRGET 
£34 
NAMEFIN 
£48 
NAMEÉERR 
£58 
NAMELETT 
NAMEENR 


NAMEFLG+1 
CHRGET 


NAMELOOP+1 
NAMELOOP+2 
£a 

$0000,Y 
$BCO00, Y 


£$8D 
NAUELOOP 


"BLOAD" 
“,AS4000" 

8D 

TBSAVE" 
",A$4000,115360" 
8D 


£4 
LOADDT, Y 
$BCO0,7 


$1 

NAME 
£<LO8DDATA 
£>LOADDATA 
NAMEADR 
STO4000 
$3£03 
PACTINIT 
E<PACTPRGS 
E>PACTPRGB 
TRANSPRT 
RCL40002 


£4 
SAVEDT, Y 
$8C00, Y 


$1 

NAME 
E<SAVEDATA 
E>SAYEDATA 
NAMEAPRER 
STO4000 
PACTINIT 
£<PACTPRGA 
£>PACTPRGA 
TRANSFRT 
$BE03 
RCL40002 


CHRGET 
£<RCL40JSR 
£DRCL4OJSR 
EXC4000 
RCL4000 


#< SAVE et LOAB >= 


RCL200 STA 
RCL200L LDA 
STA 
DEY 
BNE 
STA 
JMP 
ST®64000 LDX 
LDY 
JSR 
LDA 
STA 


$Co004 
$BC00, Y 
$200,Y 


RCL2001 
$c085 
C9LOAD 
£<SFC40DAT 
£>STO40DAT 
CISTRING 
£2 

597 


*< SAVÉ et LOAD >m———————— 


LDY £0 LDA ($98),Y PACTPRGS JSR $CI 


STY $S6 STA 4($556),Y STA ($AS),Y 
STOZ2LO0P LDA SBCO0,Y STA $CO005 DEY 

PHA RTS BFL PACTPRGB 

JSR $cC3 STO40JSR JSR $CS JSR PACTINC 

STA S$BCO0,Y STA ($98),Y LDY £39 

BLA RTS PACTB2 JSR S$C9 

STA $C004 STO40DAT STA $CO002 STA SCOS5 

STA $200,Y LDA {$S6},Y STA (SAS), Y 

STA S$C005 STA $C003 STA $CO54 

DEY RTS DEY 

BNE STO2L00P 7< SAVE et LOAD >------- = BPL PACTB2 

LDX £<STO40JSR BACTINC LDA £40 INr 

LDY £>STOIDISR ADD $96 JMP  PACTINC 
*< SAVE €@t LOAD > : STA $9€ PACTINIT LDA £5$40 
EXC4000 LDA £0 LOA $97 STA $97 

STA $96 ADC 0 LDA £0 

STA 598 STA 597 STA $96 

LOA £$40 RTS RTS 

STA 597 PACTPRGA STA  $CO004 HS PILL Dp=----sccsmpmmmmmn ses 

L8A £$80 PACTA1 LDA ($AS5}),Y FILL JSL CHRGET 

STA $99 STA ($96),Y CMP  £S$CS 

STX EXCA40JSRr1 DEY BEC FILLAT 

STY EXC40JSR+#2 BPL  PACTAI CMP  £SA@ 
EXC40BCL LDY £0 JSR £ACTINC BNE FILLERR 
EXC40JSR JSR $0000 LDY £39 JSR COLOR 

DEY STA $C655 JSL CHRGOT 

BNE EXC40JSR PACTAZ LOA ($AS5),Y CMP  ESCS 

INC  $99 STA ($86),Y BEC FILLAT 

INC $97 DEY F'ILLERR JMP SERROR 

LDA 597 BPL PACTAZ FILLAT JSL CHRGET 

CMP £$7C STA  $C054 JSR LECTURE 

BNE EXC40BCL STA SCO005 STX LIG 

RTS INY COPY ABSARR,ABS 
RCL40JSR STA $C004 JMP  PACTINC LDA E£0 


Traitement de texte français 
Pour Apple //e, Apple //c, Apple GS. 


: Frappe au kilomètre, rapidité d'écriture, souplesse de correction. 
Glossaire puissant. recherche - remplacement. 
Creation de caractères téléchargeables sur Image Writer 
{notation mathématique, alohabets étrangers etc...) 
Impression rapide, pilotage précis de mise en page. 
Coupure correcte des mots, justification en proportionnel, 
conderñisé et expansé. 


; 7501 
Je Vous prie de m'envoyer à l'adresse ci- 





logiciel Gribouille Prix (port compris) 


! version le - fc pour lecteur de disquettes 5 1/4  S99{ HT. 710 {TTC. 
* version //e - {fc pour lecteur de disquettes 3 1/2 632 HT. 780{rTIC. 
* version GS 85S#HT. S980HT.TC. 


joint un cheque de francs libellé à l'ordre de GRIBOUILLE SARL 
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NEXTLIGN 


TSTGAUCH 


ALLUMGAU 


ALLUME 


NEXTPILE 


TESTHB 


HAUON 


HAUCFF 


$3A 
CALMSK 
LIiG 
$18 


$1c 


$1A 

£0 
FLAGNAU 
FLAGBAS 
ABS, ABSDEP 
DIV?DEC 
BITMSK, Y 
MASK 
£$18 
STATE 
ALLUMGAU 


ABSDEP 
£i 
ABSDEP 
ABSDEP+1 
£0 
ABSDEP+1 
TS TGAUCH 
DIV?INC 
BITMSK, Y 
NASK 

LIG 

£1 

$AS 
CALCOLM 
£$18 
STATE 
ALLUME 
CALCOUL 
APE 

LIG 

£1 

£1 

$AS 
CALCOLM 
TESTHB 
£1 
ABSDEP 
ABSDEP 
ABSDEP+1 
£0 
ABSDEP+] 
ALLUMGAU 
S$9A 
NEXTPILE 


LIGPILE, Y 
LIG 
ABSPILEB, Y 
ABS 
ABSPILEH, YŸ 
ABS+i 

SA 
NEXTLIGN 


CALC@UL 
LIG 

1 

ÉZ 


COLMASKO, Y 
$1E 

LIG 

BAS 
£$1A 
STATE 
HRAUCFF 
£0 
FLAGHAU 
BAS 
FLAGHAU 
BAS 

$1E 
MASK 
HAUON 


LDA FLAGHAU 
BNE BAS 

LDA LIl 

STA FLACHAU 


JSR EMPILE 
L#x LIG 
BAS CPX 2191 
BEQ F'INTEST 
LDA E$iC 
JSR STATE 
B£Q A4ASOSE 
BASON LDA £9 
STA FLAGBAS 
JMP FINTEST 
BASSE LDA FLAGSAS 
BNE FINTEST 
LDA $IE 
AD MASK 
BEQ BASCN 
LOA FLAGBAS 
ENE FINTEST 
LDA £1 
STA FLASBAS 


JSR EMPILE 
FINTEST RTS 


CALCOUL LDA 


JMP  CALCOLA 
STATE LDY ABSY 

BMI DEBORDEM 

CPY £40 

BEQ DEBORDEM 

STA STATETYPs+1 

LDA ABSRAM 

STA STATERAM#] 
STATERAM STA $C054 
STATETYP ELDA ({$00),Y 

STA $CO054 
STATEDEB AND MASK 


DEBORDEM LDA £255 

JMP  STATEDEB 
AFF LDA LIG 

AND £1l 


LDA COIMASKO, Y 
STA $IE 

LDA  ABSRAM 

STA AFF'RAM+I 


LOA $IE 
AND  MASK 
STA S$ir 
LDY ASSY 
AFFRAM  STA $CO0S4 
LDA £SFE 
EOR MAS 
AND ($183,Y 
ORA $iF 
STA ($18),Y 
STA  $C054 
RTS 
EMPILE INC S9A 
LDY $9A 
BNE EMPILI 
DEC $9A 
DEY 


EMPILI TXA 
STA LIGPILE,Y 
LDA ASSDEP 
STA ABSPILEB, Y 
LDA ABSDEP+1 
STA ASSPILER, Y 


FLAGBAS HEX 00 
FLAGHAU HEX 00 


*SP dans Maln RAM ----——“-——— 


USRINTER STX S$ADR+1 
STY SADR+2 


SRTNAUX 


S$SSERGCI 
S$ADR 


CISAVE 
CISLOOE 


CSLCAD 
CSLLOOP 





LEX  £<SSPRGCS 
LOY £>S$SPRGCI 
JSR C9STRING 


STA $C0G4 
PLA 

JMP $c9 
£HA 

TYA 

£LA 

JSR CSLOAD 
PLA 

TAY 

FLA 

STA $CO05 
RTS 

STA $COG2 
SR  $0GGG 
STA $co05 


JMP  SRTNAUX 


LDA $CS,Y 


STA LIGPILE,Y 


BPL CISLOOP 


LDY £11 
LDA LIGPILE,Y 
STA $C9,Y 


BPL CS9LLOCP 
RTS 


#INSTRUCTIQNS ===" 


TABLE 


*PALETTE 
PALETTE 


HEX  6D00 

DOB  CMDPLOT 
HEX  A000 

DDB COL8R 
HEX B8A000 
D23 DEFCOLDOR 
HEX A899 

DDB STORE 
HEX A700 

DDB RECALL 
HEX 424F35800 
PUB 30X 

ASC "EXCHANGE! 


DDB EXCHANGE 
HEX 434C5300 
DDB CLS 

REX  46494C4C00 
DDB FILL 

REX 8900 

DDB TEXT40 

HEX 9100 

DDB HGR 

HEX 9000 

DDB HGR2 

HEX 343000 

D0B TEXT40 

HEX 383000 

DDB TEXT8U 

ASC  'AGP.DHR' 
HEX CF54574F00 
DDB AGCBHR2 
ASC 'AG?.TWO"' 
HEX Cr44485200 
DDB  AGF2DHR 
ASC  ‘AG2-" 

HEX 91CF44485200 
D0OB  AGPHGDHR 
HEX 44485200 
DDB DHR 

HEX B709 

DDB SAVE 

HEX 8600 

DDB8 LOAD 

HEX 45525200 
DDB ER 

DE COULEURS -------=. 
HEX 00000000 
HEX 2A552255 
HEX  552A552A 
HEX 7E7F7E7E 


ASTARTUP 
STARTUP 


STARTUP3 


STARTUP2 


STARTUPI 


STARTUP4 


STARTUPS 
STARTUPE 


STARTFIN 


STARTUPD 
DATADT06 


DATADTFA 
#*The end. 


HEX 80808080 
HEX  AAD5AADS 
HEX  DSAAD5AA 
HEX  FEFILFFE 
HEX 362A2h36 
HEX 08084141 
HEX FE3F3FFE 
HEX CA2923CA 
HEX C42828C4 
HEX 70ADAD7G 
HEX EAS757EA 
HEX 2A5555ZA 


LDY #3 
LDA STARTUPD-1+$1800,Y 
STA $€ 


LDA £$20 

STA $8 

LDA $8 

STA S$7 

LDA $6 

STA $C995 
STA DTHGR1,X 
104 5$7 

STA DTHGR2, X 
STA $CO04 
LDA £4 

ADD $7 

STA S$7 

INX 

TXA 

AND £7 

BNE  STARTUP] 
LDA $6 

ÊOR £5$80 

STA $6 

TXA 

AND £15 

BNE  STARTUP2 
INC $8 

LODA 58 

CMP £524 

BNE  STARTUPZ 
DEY 

BNE  STARTUP3 
LDY £5 

LCA DATADTO6+51800, Y 
STA $06,Y 


LDA DATACTFA+S$S1800,Y 
STA $[A,Y 


BPL  STARTUP4 
LDA £$8 

STA $ai 

LDA £$0 

STA S$AO 

STA $A2 

LDA £$20 
STA $A3 
STA $c005 
LDY EG 

LDA  (SA2j,Y 
STA  ($A0j,Y 


BNE  STARTUPE 

LDA $A3 

CMP  £>STARTUP+51800 
BEQ STARTFIN 

INC $a1 

INC S$A3 

JR  STARTUP5+$1800 
COPY VCTAMPER,AMPERS2 
STA S$C004 

LOX £6 

STX VCTAMPER 

LDX £0 

STX VCTAMPER+I 


HEX 502800 
STA $C003 
JMP  DEBÜUT 
STA $C002 











I —— 
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Bruno BOISSIERE 


Nul besoin de présenter ce jeu qui consiste à remettre en 
ordre une image (SHGR couleurs ici) bouleversée par 
l'ordinateur. 


Ce programme a été écrit dans un but de familiarisation 
avec GS Basic et la boîte à outils de l'Apple 1IIGS. La 
documentation du GS Basic etle livre de Jean Pierre Curcio 
‘Boîte à outils de L'Apple IIGS’, bien que les exemples 
soient en langage C, sont très utiles. Le programme de 
démonstration nommé PICS de la disquette GS Basic est 
très instrucüuf. Il a servi d'inspiration au programme Puzzle. 


Utilisation 


Il vous faut tout d'abord lire une image en ouvrant un 
fichier. Le programme nee sachant pas décompacter une 
image, il ne vous proposera que les fichiers de type SCI 
(image non compactée). Au besoin utilisez GS Paint ou 
tout autre logiciel de dessin pour sauver les images sous 
forine non compactée (type écran). 

Une fois votre image chargée, vous pouvez alors choisir le 
nombre de pièces avec le menu du même nom (choix de 4 à 
100 pièces). Tant que vous n'avez pas mélangé vous 
pouvez essayer plusieurs découpages. Lorsque vous êtes 
près, mélangez ! (menu ‘Jouer”). 

Le mélange étant fini, vous pouvez commencer à 
reconstituer l'image en cliquant sur les pièces que vous 
voulez échanger. Chaque fois que vous cliquez sur une 
pièce, elle s'entoure et si vous avez cliqué auparavant sur 
une autre, elle s'échange avec elle. Laissez le programme 
travailler : ce n'est pas un langage compilé. Dès que le 
mélange a été effectué, vous pouvez vérifier quand vous le 
souhaitez si vous avez réussi à reconstituer l'image. 

À tout moment pour vous aider, vous pouvez, par le menu 
‘Ecran’, passer de l'image puzzle à l'image reconstituée et 
vice-versa. Vous pouvez aussi par le même menu visualiser 
ou non la grille. Dans n'importe quelle phase du jeu, vous 
pouvez changer d'image en en chargeant une autre ou, bien 
sûr, sortir du programme. 

Attention aux images comportant, une fois découpées, des 
pièces semblables. Vous penserez les avoir reconstituées 
alors que pour le programme les pièces ne seront pas à 
leurs emplacements de départ. 


Structure du 
programme 


Le programme principal PUZZLE2 est appelé par le 
programme PUZZLE qui charge les fichiers TDF. 

Le programme principal est constitué des initialisations et 
d'une boucle presque vide en ligne 19600, tout le reste étant 
des sous-programmes. Ce sont les interruptions créées par 
la sélection d'un menu ou par un click souris qui vont faire 
s'éxécuter tel ou tel sous-programme. Comment sont t'ils 
appelés ? 


Appels par les menus 


L'instruction MENUDEF à la ligne 19200 a pour fonction de 
lier les numéros d'articles définis dans l'initialisation des 
menus (lignes 17800 à 18200) aux labels des 
sous-programmes. I1 faut ajouter le nombre juste après 
MENUDEF à 256 et à la position du label dans l'instruction 
pour obtenir le numéro de l'article qui va pouvoir appeler le 
sous-programme. Par exemple le sous-programme 
DECOUPE64 est appelé par l'article 1 (nombre après 
MENUDEF) + 255 + 4 (rang de DRAwPUZZLE dans la liste) = 
260 (article ‘64’ du menu ‘Nb de pieces" : ligne 18000). 


Appels par un click souris 

L'instruction EVENTDEFr à la ligne 17100 relie les 
sous-programmes DRAWPUZZLE lt DRAWIMAGE AUX 
événements de mise à jour des fenêtres dont les structures 
sont puzzle! () et imagent! (). L'instrucu on EVENTDEF à 
la ligne 19300 elle, relie le sous-programme CzICKx au 
click dans une fenêtre qui est codé 19 par GS Basic. La 
plupart des actions clavier ou souris sont ainsi codées. 
Lorsque le programme tourne on est dans la boucle en 
19600. Dès qu'on crée un événement (appel à un menu ou 
click) on saute au sous-programme défini par les 
instruCtiOnS MENUDEF @t EVENTDEF. Chaque 
sous-programme ainsi appelé doit se terminer par RETURN 
o. On revient alors en attente dans la boucle. Même la 
sortie du programme est ainsi traitée. L'appel de l'article 
‘Quitter’ fait éxécuter le sous-programme QUITTER qui met 
l'index quitflage à . La boucle testant cet index, on en 
sort dès qu'on y revient. 
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Instructions TASKREC 


Dans les sous-programmes, vous trouverez les variables 

TASKREC3(1) et TASKRECàä (I). Ce sont des variables 

réservées de GS Basic. TASKRECS (1) est dimensionné à 12 

et TASKRECà (1) à 11. Voici quelques affectations de ces 

variables : 

- TASKREC3({6) donne la coordonnée verticale de la 
souris. 

-  TASKREC#(7) donne la coordonnée horizontale de la 
souris. 

-  TASKRECS (9) donne le numéro d'article. 

- TASKREC8 (10) donne le numéro du menu. 

-  TASKRECà {92 donne le handle sur la fenêtre active. 


C'EST UN > RON. c EST 








Où 


nn" La Lans 

ous 
| sn. 
Initialisations 


Les outils utilisent beaucoup les structures. Pour les 
intialiser, il est pratique d'écrire les valeurs sous forme de 
datas ct d'écrire une petite procédure qui lit ces datas et 
transfère les valeurs dans la structure voulue. 


On peut de cette manière coder dans les datas les types de 
variables qu'on veut écrire dans la structure. Par exemple, 
dans le programme PUZZLE, la procédure Char dara (ligne 
42800) prend en compte les nombres derrière les caractères 
+ comme des entiers (2 octeis) et les nombres derrière les 
caractères à comme des doubles entiers (4 octets). On 
pourrait étendre cette technique à des nombres que l'on veut 
écrire en hexadécimal ou en binaire. 


Outil PaintPixels 


Le programme travaille sur trois images stockées dans des 
structures. La structure picimage!1{} contient l'image 
entière. La structure pic!) contient l'image puzzle 
mélangée qu'on voit à l'écran. La structure picrecep'1} 


contient une image de travail qui sert au moment d'un 
échange. En effet lorsqu'on veut échanger deux pièces 1 et 
2, la procédure echange copie la pièce 1 de pic à 
l'emplacement 2 dans picrecep et la pièce 2 de pic à 
l'emplacement 1 dans picrecep. Elle copie ensuite la pièce 
1 de picrecep à l'emplacement 1 dans Li et la pièce 2 de 
picrecer à l'emplacement 2 dans pic. Pour cela cette 
procédure utilise l'outil PzaintPixels (pointeur). Cet 
outil copie le contenu d'un rectangle appartenant à un 
locinfo dans un autre rectangle appartenant à un autre 
2ocinfo. Les deux 10cinro et les deux rectangles sont 
définis dans la structure ‘pointée’ par pointeur. Dans ie cas 
du programme PUZZLE, les rectangles sont 
ngoureusement de même taille mais l'outil Painrpixels 
est capable de faire des mises à l'échelle si les rectangles 
sont de dimensions differentes. 


TransfertsAppleSoft + GSBasic 


Il vous suffit, pour récupérer vos plus chers programmes 
AppleSoft, de les transforiner en fichier texte grâce au 
programme de capture bien connu que l'on ajoute en tête du 
programme à récupérer avant de le RUNer : 

O PRINT CHR$(4) "OPEN TEXTE 

1 PRINT CHR$(4)"WRITE TEXTE 


2 TEST 5, 
3 PRINT CAHR$ (4) "CLOSE TEXTE 
4 END 


Attention, avant ceite transformation, supprimez ou 
remplacez les instructions suivantes qui font planter GS 
Basic: 

- HGR, HGR2, HCOLOR, HPLOT 
faire tellement mieux. 

HIMEM €t LOMEM qui sont inutiles sous GS Basic. 

INT qui fait planter le RE=Nu“ de GS Basic. Il faut alors 
se débrouiller avec ROUND{) et FIX (). 


- GET X$ à transformer en GETS xs. 


À ious ceux qui connaissent l'AppleSoft, et ils sont 
nombreux, GS Basic permet d'accéder rapidement et 
facilement aux outils de l'Apple IIGS et donc d'écrire des 
programmes possédant une interface utilisateur évoluée 
(menus déroulants, multi-fenêtrage, etc.). De plus 
moyennant quelques adaptations rudimentaires, ils peuvent 


técupérer des programmes AppleSoft. 


L 


Programme GSBasic ‘Puzzle 


.mais QuickDraw sait 


N.B. : Les préfixes prévisés dans Puzzle conduisent à organiser 
votre disquette de la façon suivante : 


Votre disquette s'appelle /cs531. 

Le dossier /csB1/TDFs contient les librairies. 

Le dossier /cSB1/80ISSIERE contient les programmes Puzzle, 
Puzzle 2 ct l'image de démarrage Demar. 

Le dossier /G581/IMAGES.PUZZLE Contient... 
à puzzler. 


vos images SHGR 
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10000 REM or, du Memory Manager, de Miscellaneo 
10100 REM us Tools et de Event Manager sont fai 
10200 REM Bruno Boissière le 07/05/89 tes pa r GS Basic 
10300 REM Programme PUZZLE version i 12500 REM Initialisation de Quick Draw 
10400 REM 12600 GRAF INIT 320:GRAF ON 
10500 REWM 12700 REM Identification de l'application 
10550 PREFIX 0,"/GSBl" 12800 myidt=EXFN_MMStartUp 
10600 REM Libération d'environ 64 koctets 12900 REM Réservation de 4 pages zéro 
10700 CLEAR 65600 13000 aa#%-EXFN_loword(TEN("COCS")} 
10800 PRINT FRE;" octets disponibles" 13100 hä=EXEN_NewHandle (4*256,myidé#, aà#, 0) 
10900 REM Chargement des fichiers .tdf 13200 REM Adresse du bloc de 4 pages zéro 
11000 PREFIX 1, "O/TOFS" 13300 aaë=PEEK(hä)+256*PEEK{hà+1) +256*256*P 
11100 LIBRARY “i/locator.taf” EEK(hà+2) 
11200 LIBRARY APPEND “l/memory.tdf" 13400 REM Jnitialisation du Window Manager 
11300 LIBRARY APPEND "l/misctool.tdf" 13500 _WindStartÜp (myid$) 
11400 LIBRARY APPEND "l/quickdraw.tdf" 13600 REM Initialisation de Control Manager 
11500 LIBRARY APPEND "l/event.tdf" 13700 _CtiStartup(myid#, aaä) 
11600 LIBRARY APPEND "l/window.tdf" 13800 REM Initialisation de Line Edit 
11700 LIBRARY APPEND "l/control.tdf" 13900 __LEStartUp(myid$,aaä+1*256} 
11800 LIBRARY APPEND "l/lineedit.teèf" 14000 REM Initialisation de Dialog Manager 
11900 LIBRARY APPEND "l/dialog.tdf" 14100 _DialogStartUp(myid#) 
12000 LIBRARY APPEND "l/menu.tdf” 14200 REM Initialisation de Menu Manager 
12100 LIBRARY APPEND "l/scrap.tdf" 14300 _MenuStartUp{(myid#,aaà+2*256) 
12200 LIBRARY APPEND "l/stdfile.tdf” 14400 REM Visualisation de l'image de démar 
12300 LIBRARY APPEND "l/desk.tdf" rage 
12400 LIBRARY APPEND “l/intmath.tdf" 14500 __BlockMove (VARPTR(pic!(0)},14753792,3 
12500 REM Réinitialisation de l'imprimante 2768) 
sans AUTO-LF 14600 REM Initialisation du Scrap Manager 
12600 ASSIGN ".PRINTER",-1 14700 _ScrapStartUp 
12700 ASSIEN ".PRINTER", 1 14800 REM Initialisation du Standard File © 
12800 REM Passage en mode texte pour efface perations 
r l'image du boot 14900 _SFStartUp{myidt,aaä+3*256) 
12900 TEXT 15000 REM Initialisation du Desk Manager 
13000 REM Lancement du programme PUZ2LE2 15100 _DeskStartUp 
13100 PREFIX "Q/BOISSIERE" 15200 REM Initialisation des datas des fene 
13200 RUN "PUZZLE2" tres 
15300 RESTORE datafensim:PROC chardata{VARP 
TR{apropos!{(0)}} 
£ 3 15400 RESTORE datadimapro:PROC chardata(VAR 
Programme ‘Puzzle2 PTR(apropos! (62))) 
15500 RESTORE datäafensim:PROC chardat a (VARP 
10000 REM TR(puzzle!(0))} 
10100 REM 15600 RESTORE datadimpuz:PROC chardata(VARP 
10200 REM Bruno Boissière le 03/06/89 TR(puzzle!(62)}}) 
10300 REM Programme PU2ZLE version 2.0 15700 RESTORE datafensim:PROC chardata(VARP 
10400 REM TR{imagent!{0}}} 
10500 RÈM 15800 RESTORE datadimimag:PROC chardäta {VAR 
10600 CLEAR 131072 PTR(imagent ! (62))) 
10700 REM Traïrement des erreurs 15900 RESTORE datafensim:PROC chardata(VARP 
10800 ON £RR NOTRACE:TEXT:PRINT:PRINT ERRT TR{gagne!(0}}} 
XTS(ERR};" Errevr à la ligne ";ERRLIN 16000 RESTORE datadimgagne:PROC chardata {Va 
;CÈËRS (7) :GOTO fin RPTRigagne! (62))} 
10900 ON BREAX NOTRACE:GOTO fin 16100 waä=EXFN NewWindow {VARPTR {apropos ! {0} 
11000 REM Dimensionnements 1} 
11100 DIM menul!(120),menu2!{i20},menu3! (12 16200 REM Initialisations des LocInfo 
C),menu4!(120),menu5S!{120} 16300 RESTORE datalocinfo:PROC chardata (VAR 
11200 DIM pic!1(132767),picrecep!{32767}),pici PTR{loclinfo!{0})) 
nage! (32767) 16400 RESTORE datalocinfo:PROC chardata (VAR 
11300 DIM puzzle!{78), imagent ! (78), a@ropos! PTR{loc2info!f0})} 
(78),gagne! (78) 16500 RESTORE datalocinfo:PROC chardata {VAR 
11400 DIM ligne!(256}),veczeur!({100) PTR(loc3info:(0))} 
11500 DIM reply!{149),listype!{10) 16600 SET{lociinfo!{2},4}=VARPTR(pic!1(0)} 
11600 DIM recr!(7),srcrect!{7},receprect!(7 16700 SET(loc2info!(2},4}+VARPTR(picrecep!{ 
),entour! (7) 0)) 
11700 DIM loclinfo!{15}), loc2info!(15},loc3i 16800 SET(loc3info!(2},4)-VARPTR{picimage!( 
nfo!{15) 0)) 
11800 DIM pointeurpp!{21} 16900 RESTORE datasrcrect : PROC chardat a {VAR 
11900 DIM npdc#({100) PTRisrcrect!(0))) 
12100 REM Chargement de l'image de démarrag 17000 REM Gestion des événements liés aux f 
e enètres 
12200 REM PROC charge ("CEMAR"} 17100 EVENTDEF 60, drawpuzzle, drawimage 
12300 REM Initialisation des outils 17200 SET (puzzle!(58), 4) “EXEVENTà (60) 
12400 REM Les initialisations du Tool Locat 17300 SET(imagent ! (58), 4)=EXEVENTà(61} 
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EL... 








17600 
17700 
17800 


17900 


18000 


18100 


18200 


18300 


18400 


18500 


18600 


18700 


18800 


18900 


19100 
19200 


19300 
19400 
19500 
19600 
19700 


20600 
20800 
20900 
21000 


21100 
21200 













Les rédacteurs de Pom'’s vont redouter le syndrome de la 
page blanche cher aux écrivains : un papier ‘protecteur’ a 
singulièrement allégé la page 21 denotrenuméro 42. Vous 
avez perdu le titre : Eject.System, mais surtout le nom de 
l'auteur du programme, Patrick Blancheton ct Ic dessin de 
: Gilles Coursier. 

Les protéctions sont maintenant sous haute surveillance. 


APROPOS : 


Une page dépouillée 








REM Mis en place de la barre de menus 
_RefreshDeskTop{(0} :_ShowCursor 
SET(menu1!(0))}="> àçNIX"+CHRS(0)+"- À 
propos de puzzieçN257 V"+CHRS(0)+"." 
SET(menu21(0))j="> Fichier çN2'"+CHRS( 
0)+"— Ouvrirç"*OoN259#+ CHRS(0)+"- -<N 
266D"+CHR$(0)+"- Quitterç"*QqN258"+CHR 
S(0}+7." 
SET (menu3!(0))="> Nb de pieces $N3D* 
+CHRS (0)+"- 4çN268"+CHRS(0}+"- I6çN26 
9#CHR$S(0)+"- 25çN270"+CHR$S(0)+"- 64ç 
N260"+CHR$(0)+"- 100çN264"+CHR$S(0}+". 
" 
SET(menu4!{0))="> Jouer çN4D"+-CHRS(0O 
)+"— MelangerçN261"+CHRS(0)+"- Verifi 
ezçN267D"+CHRS(0)+"." 
SET(menu5! (0))="> Ecran çN5D"+CHRS(0 
}+"- Image puzzleçN262"+CHR$S(O)+"- Im 
age entiereçN263"+CHR$(0)+"- GrillecN 
265"+CHR$(0)+"." 
_InsertMenu(EXFN_NewMenu (VARPTR {menus 
?(0)}),0) 
__InsertMenu (EXFN NewMenu (VARPTR (menu4 
?(0))),0) 
_InsertMenu(EXFN_NewMenu (VARPTR(menu3 
1f0)7),0) 
__InsertMenu (EXFN_NewMe nu (VARPTR (menu2 
1(0))),0) 
__InsertMenu (EXFN_NevwMenu(VARPTR(menu1 
:(0}3)),0) 
_FixAppleMenu (1) :_FixMenuBar:_DrawMen 
uBar 
index$=1:grilles--1:numart$-0:quitfla 
g3=0 
REM Appels par les articles des menus 
MENUDEF 1, apropos,quitter, charger, dec 
oupe64,melanger, drawpuzzlée, drawimage, 
decoupe100,grille,quitter,verifier,de 
coupes, decoupel6, decoupe25 
EVENTDEF 19,click 
TASKPOLL INIT TEN("$SFFF"),-1 
TASKPOLL ON 
DO:UNTIL quitflag3%:GOTO fin 
REM Dessin de la fenêtre de présentat 
ion du Jogiciel 

_SelectWindoiy(waä) :_Sho»Window(wa 
à} 
_SetPort(waä): SetOrigin(0, 0) 
SET(ligne! (0))=""Puzzle V2.0* 
_MoveTo(15,15}; DrawString(VARPTR(lig 
ne!(0))} 
SET(ligne! (0})=""Par Bruno Boissiere" 
_MoveTo(15,30) :_DrawString(VARPTR(l1ig 
ne!(0))} 


21300 
21400 
21500 
21600 
21650 
21700 
21710 
21720 
21730 


21800 


21900 
22200 
22300 
22350 
22480 
22410 
22420 
22500 
22600 
22800 
22900 
22950 
23000 
23050 
23100 
23200 


23300 


23400 


23500 


23600 


23700 


23800 
23900 


24000 


24100 


24200 
24300 


24400 


24500 


24550 
24600 


24700 


24800 


DRAWPUZZLE: 


DRAWIMAGE: 


QUITTER: 


CHARGER: 


SET(ligne! (0})=""Version de juin 1989 


_MoveTo(15,45}: DrawString{VARETR(lig 

ne!(0))} 

_HiliteMenu(0,TASKREC#(10)) 

RETURN 0 

RE! Dessin de la fenétre du puzzle 

__ShowWindow (wpa) :_SelectWindow (we 
à) :_SetPort (kpä) 

REM Gessin de l'intérieur de la fenèt 

re 

_PPToPort (VARPTR(locliinfo! (0}), VARPTR 
{(srcrect!(0})),0,0, 0) 

IF grililet-1 THEN GOSUB dessingrille 
REM Cochage de l'article Image puzzle 
et suppression du cochage de l'artic 

le Image entière 
_CheckMIitem(1, 262): CheckMItem(0, 263) 
_HiliteMenu(0, TASKREC3(10})} 

RETURN 0 

REM Dessin de la fenêtre de l'image e 

ntière 

_Showifindow(wiä) :_SelectWindow (wi 
à/:_SetPortr(wiä) 

REM Dessin de l'intérieur de la fenèt 
re 

__PPToPort {VARPTR({l1oc31nfo!(0)},VARPTR 
{srcrect!(0)},0,0,0) 

REM Cochage de l'article Image ertièr 
e et suppression du cochage de l'arti 
cle Image puzzle 

_CheckMItem(1, 263) :_CheckMItem(0, 262} 
_HiliteMenu(0, TASKREC%{10)) 

RETURN 0 

REM Sortie du programme 

quitflag%=]:TASKPOLL OFF:RETURN 0 
REM Chargement d'une image 
SET(ligne!(0)}=""Nom de l'image a 

charger" 

REM affichage des fichiers de type $C 
1 seulement 
SET(listype!(0),1)21:SET(list;pe!(1), 
1)=193 
_SFGetFile(30,50,VARPTR(1igne!(0)),0, 
VARPTR(listÿype!(0)}, VARPTR(reply!(0)) 
} 

REM capture du nom du fichier sélecti 

onné 

aa$=VARS (VARPTR(repiy!(7)}, PEEK (VARPT 

R(reply!(6))}} 

REM Chargement de l'image dans pic!{(0 
) 

PROC charge(aa$} 

REM Copie de pic! dans picimage! pour 
l'image entière 

_Blockfove (VARPTR(pic!(0)), VARPTR(pic 

image! (0}),32768) 

REM Activation des menus Nb de pieces 
, Puzzle et Ecran 

aa%-EXFN loword(iTEN("FF7F")) 
_SetMenuFlég(aat, 3): _SetMenuFlag(aat, 
4}:_SetMenuFlag(aa$, 5) : DranwMenuBar 
REM Si ce n'est pas la première fois 
qu’on charge une imagealors on réinit 
ialise les menus et articles 

IF numart# THEN CheckMItem(0,numart# 
):_ DisableMIitem(267) 

REM Initialisation des fenêtres 
wpè=EXFN_NewWindow (VARPTR (puzzle! {0})) 
} 

wià-EXFN NewWindow (VARPTR(imaäagent! (0) 
)) 

wgà=EXFN NewWindow(VARPTR(gagne!(0))) 
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24900 REM Mise à jour de la palette 32800 NEXT 
25000 _BlockMove {VARPTR(pic!{32256) }, 147860 32900 NEXT i 
48,512) 32950 IF grille$=1 THEN GOSUB dessingriile 
25100 _ShowWindow{wpä) 33000 REM Désactivation du menu Nombre de p 
25200 REM Cochage de l'article 1mage puzzle ièces 
et 25 pièces 33100 aa$%-=EXFN_lot’ord(TEN("0080")}: SetMenu 
25300 __CheckMIter1{2,262) :numart#=270; Check Flag(22%,3) | 
MItem{i, numart ?} 33200 REM Activation de l'article Vérifier | 
25350 melange#-0 33300 _EnableMItem (267) 
25400 REM Découpage par défaut 33400 REM Déclenchement du chronométre 
25500 npdc3$ (0) =25 :nbh$=SÇR (npdc® (0) ) :n&v$=n 33500 “MER ON:chronoë=SECONDSä:TIMER OFF 
bh$ 33600 _#iliteMenu(0, TASKREC$#(10)) 
25600 FOR i=1 TO 100 33700 RETURN 0 
25700 npdc#(i)=i 33750 REM Vérification de l'image 
25800 NEST i 33800 VERIFIER: test#=1 
25900 _HiliteMenu (0, TASKREC$ (10)) 33900 FOR i=1 TO npdc#(0) 
26000 RETURN 0 34000 IF npdc#(i)<>i THEN test#=0 
26050 REM Choix du nombre de pièces 34100 NEXT i 
29100 DECOUPEA4: npdc#(0)=4:GOTO findec 34200 _ Select‘ #indow(wgäà) :_ ShowWindow(wgä) 
29200 DECOUPE 16: npdc#(0)=16:GOTO findec 34300 _SetPort {wgä}):_SetOrigin(0, 0) 
29300 DECOUPE25: npdc#(0)=25:GOTO0 findec 34400 IF test#=0 THEN aa$-"L'image est diff 
29400 DECOUPE64: npdc$ (0)=64:GOTO findec erente ":bb$="de l'originale":G@TO fi 
29500 DECOUPE100: npdc${(0)=100:GOTO findec nvex 
29600 FINDEC: nbh$=S@R {npdc$ (0) ) :nbv$=nbh# 34500 REM Réactivation du menu Nombre de pi 
29700 REM Décochage dü nombre de pièces pré èces 
cédent et cochage du nouveau nombre d 34600 aa%#EXFN_loword{TEN("FF7F"}): SetMenu 
e piéces Flag{aa$,3) 
23800 _CheckMItem (0, numart$) :numart$=TASKRE 34700 REM Désactivation de l'article Verifi 
C$#({9): CheckMItem(l, numart$} er 
29900 __SetPort {wpä) :_PPToPort {VARPTR(loclin 34800 _DisableMIten(267) 
fo!:(0)), VARPTR(srcrect!{0)),0,0,0) 34900 REM Arret du chronomètre 
30000 GOSUB dessingrille 35000 TIMER ON: chronoà=SECONDSä-chronoë:TIM 
30100 _HiliteMenu(0,TASKREC$(10)) ER OFF 
30200 RETURN 0 35:00 aa$="*Vous avez mis "+CONVS(chronoä)+" 
30700 REM Choix de l'option "grille" secondes":bb$="pour reconstituer l'i 
30800 GRILLE: grille%=-ltgriliet mage” 
30850 __SetPort (wpä) 35200 melange#$=0 
30900 IF grille$=1 THEN GOSUB dessingrille: 35300 FINVER: _MoveTo (15,15):_DrawText {VARPTRS ( 
__CheckMïtem (1, TASKRECS% (9) ) aa$),LEN(aa)) 
31000 ELSE _PPToPort (VARPTR{I1oclinfo!(0}) 35400 _MoveTo{15,30):_ DrawText (VARPTRS (bb$) 
, VARPTR(srcrect!(0)),0,0,0}):_CheckMIt , LEN(DDS$)) 
em(0, TASKREC#(9)) 35500 _HiliteMenu(0, TASKREC#(10)) 
31100 _HiliteMenu(0,TASKREC$(10))} 35600 RETURN 0 
31200 RETURN 0 35650 REM Gestion du click dans une fenètre 
31250 REM Dessin de la grille 35700 CLICK: #à=EXFN_ Front#indow 
31300 DESSINGRILLE: REM _SelectWindow(wpä}) :_ShowWindo 35800 IF wä=waà THEN _Hide#indow(waæàä) :GOTO 
w(wpä) :_SetPort{wpä) fincli 
31400 _SetSolidPenPat (15} 35900 IF wä=wgä THEN HideWindow(wgä) :GOTO 
31500 FOR i=0 TO nbh% fincli 
31550 _MoveTo(i*320/nbh#-1,0): LineTofi*3 35930 IF wä=wià THEN GOTO fincii 
20/nbh$-1,200) 35960 IF melange$=-0 THEN GOTO finclili 
31600 _MoveTo{i#320/nbh%,0}: LineTo(i*320 36000 _SetPort {wpä} :index$=-1#index$ 
/abh#%,200} 36100 aa%=1+FIX { (TASKREC#(7)) *nbh#/320) :bb# 
31700 NEXT i =1+FIX((TASKRECS (6)} *nbv%/200) 
31800 FOR i=0 TO nbv% 36200 IF index$»=-1 THEN anh$%=aa$#:anv$-bb3%:P 
31850 _MoveTo (0, i*200/nbv#-1): LineTo (320 ROC entour(anh#,anv$}:GOTO fincli 
-i*200/nbv%-1) 36300 nvh$=aa#: nvv$#=bb$:PROC entour(nvh#,nv 
31900 _MoveTo(0,1i*200/nbv%): LineTo(320,i v#) 
*200/nbv3#) 36400 PROC echange (anh#%,anv$,nvh$,nvv#} 
32000 NEXT i 36500 _PPToPort (VARPTR (1oclinfo!(0)), VARPTR 
32100 RETURN (srcrect!(0})},0, 0, 0) 
32150 REM Mélange des pièces 36600 IF grille$-1 ThEN GOSUB dessingrille 
32200 MELANGER: _SelectWindow(wpä} :_ShowWindow(iwp 36700 FINCLI: RETURN 0 
â} :_SetPort (wpä} 36800 FIN: GRAF OFF 
32250 melange$=] 36900 OFF ERR:NOTRACE 
32300 FOR i=1 TO nbv# 37000 _DeskShutDown:_SFShutDown: ScrapShutD | 
32400 FOR j=1 TO nbh# own:_MenuShutDown 
32500 PROC echange(j,i, ROUND(1+(nbh$-1) 37100 _DialogShutDown:_LEShutDown:_Ct1ShutD 
*RND(1)), ROUND(1+(nbv3%-1} *RND(1)})) own: _WindShutDown 
32600 REM _SelectWindow (iwpä)} :_ShowWindo 37200 REM _DisposeHandle(WMHandleä} 
w (Wwpè} :_ SetPort(wpä) 37300 TEXT 
32700 __PPToPort (VARPTR(lociinfo!{0)},VA 37400 END 
RPTR(srcrect!(0}},0, 0,0) 37500 REM 
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eprect vers celui défini par receprec 


37600 REM 
37700 REM Sous Programmes È 
37800 REM 42200 SET(pointeur pp!(8),4}=-VARPTR(receprec 
37900 REM Entourage piece sélectionnée t{(0)) 
38000 DEFENTOUR : DEF PROC entour(arh$,anv$) 42300 SET{(pointeurpp!{(12},4)=-VARPTR(recepre 
38100 x18«(anh&-1} *320/nbh$:ÿ1#=(anv$-1)*20 ct!#{0)} 

0/nbv$ 42400 _PaintPixels(VARPTR(pointeurpp!(0))) 
38200 X2%=x1$#+320/nbh8:y2%=y18+200/nbv% 42500 END PROC echange 
38300 SET (entour!(0),2)=#y1$:SET{entozr!{2}, 42600 REM 

2)=x1% 42700 REM $:entier, ä:double entier 
38400 SET{entour!(4),2)=y2%:5ET{ertour!{6}), 42800 DEFCHARDATA: DEF PROC chardata {destä} 

2)=x2% 42900 n$=0 
38500 _SetSolidPenPat (0) :_FrameRect {VARPTR( 43000 READ a$ 

entour!(0)}} 43100 WHILE LEN(as) 
38600 END PROC entour 43200 X$=INSTR{"#$à",MID$(as,1,1)) 
38700 REM 43300 REM Suppression premier caractêre 
38800 REM Echange de deux rectangles 43400 a$=MID$ (a$,2) 





38900 DEFECHANGE : DEF PROC echange(anh#,anv&,nvh#,n 43500 
vv$) 43600 ENT: 


ON x$ GOTO ent,dent 
SET(vecteur!{(n%),2)=-CONV& (a$):n 





39000 REM Mise à Jour des numéros des pièce $=-n$+2:GOTO suivant 
s situées dans les deux cases 43700 DENT: SET(vecteur!{n%),4}=CONVä{a$):in 
39100 SWAP npdc$% ((anv$-1)“nbh#$-+anh%), npdc$ ( #en$+4:GOTO suivant 
(nvv$-1)*nbh$+nvh#) 43800 SUIVANT: READ a$ 
39200 REM definition rectangle à déplacer 43900 UNTIL 
39300 X1$%={(anh$-1)*320/nbh$ :y1#%={arv$-1) 20 44000 REM Transfert de vecteur!{n%-1} à par 
0/nbv$ tir de destä 
39400 x23-x1#+320/nbht:y2%=y18+200/nbv8 44100 FOR i=#0 TO n$-1 
39500 SET{rect!{(0},2)}=-y18:5ET(rect!{2},2}=x 44200 POKE destä+i,vecteur!{(i} 
1# 44300 NEXT ji 
39600 SET(rect!(4),2}=-y2#%:5ET(rect! {6}, 2}=x 44400 END PROC chardata 
24 44500 REM 
39700 REM Définition du rectangle récepteur 44600 DEFCHARGE: DEF PROC charge (aa$) 
39800 xX18=(nvVh$-1}*320/nbñ$:y13-{nvv3-1) "20 44700 REM Chargement de l'’'irage 
0/nbv$ 44800 OPEN äaf$, FILTYP-193 AS£11,32767 
39900 x2%=-x1%#320/nbh%:y2%=y18#+200/nbv$ 44900 GET£I1;pic!'{0} 
40000 SET (receprect!(0},2)=y1#:5ET(receprec 45000 CLOSE £11 
t1{2),2)=x18 45100 END PROC charge 
40100 SET(receprect!(4}),2)=y2%:SET(recep:ec 45200 REM 
t'{6),2)=x28 45300 REM 
40200 REM Copie de puzzle ({loclinfo}) vers r 45400 REM Datas 
ecepteur {loc2info) 45500 REM 
40300 SET {pointeurpp!(0),4)=-VARPTR(leclinfo 45600 REM Fenetre sirple 
! {0)) 45700 DATAFENSIM: DATA $78 
40400 SET (pointeurpp'!(4),4)=VARPTR(loc2info 45800 DATA %0,à0,à0 
!{0)) 45900 DATA %0, $0, $9, 30 
40500 REM Copie du rectangle défini par rec 46000 DATA a0, #0, #0 
t vers celui défini par receprect 46100 DATA %0, %0,%0, 80,80, 59,%0, 40 
40600 SET {pointeurpp!(8),4)=VARPTR(rect ! (0) 46200 DATA à0, $%0,à0, aC,à0 
) 46300 DATA %0,80,%0,%0 
40700 SET (pointeurpp!{12}),4)-VARPTR(recepre 46400 DATA à-1,à0,"" 
ct!(0)) 46500 REM 
40800 SET ({pointeurpp!(16),2)=0 46600 REM fenetre complete 
40900 SET(pointeurpp!{(18),4)=0 46700 DATAFENCOM: DATA #78 
41000 _PaintPixels {VARPTR(pointeurxp!(0))) 46800 DATA 4#56736, ä0,a0 
41100 REM Copie du rectangle défini par rec 46900 DATA 326,3%0,%190,%320 
eprect vers celui défini par rect 47000 DATA à0,3%0,%0 
41200 SET(pointeur pp!(8),4)=-VARPTR(receprec 47100 DATA #200, 4320, 3200,3320,%4,#8,#40,38 
t'(0)) 0 
41300 SET(pointeur pp!(12},4)=VARPTR{rect! (0 47200 DATA à0,#0,à0,ä0,à0 
)) 47300 DATA %0, #0, %0, #0 
41400 _PaintPixels {VARPTR(pointeurpp!(0})} 47400 DATA à-1,à0,"" 
41500 REM Copie de recepteur (loc2info) ver 47500 REM 
s puzzle floclinfo) 47600 REM Dimensions des fenetres 
41600 SET(pointeurpp!(0),4)=VA4aRPTR(loc2info 47700 DATADIMPU2: DATA #0,#0,#200,%320,"" 
1107) 47800 DATADIMIMAG: DATA %0, 40, 3200, 8320, mr 
41700 SET (pointeirpp!(4},4)=-VARPTR(loclinfo 47900 DATADIMAPRO: DATA #50, #50, #105, 8220, °" 
!40)) 48100 DATADIMGAGNE: DATA #30, $450, 870, $#265,"" 
| 41800 REM Copie du rectangle défini par rec 48200 REM 
| t vers celui défini par rect 48300 DATALOCINFO: DATA %0,40,8160, $8, #0, $200, #320, " 
| 41900 SET(pointeurpp'!(8), 4} =VARETR{rect : {0} " 
} 48400 DATASRCRECT: DATA #%0,#0, 8200, 8328, "" 
42000 _PaintPixels {VARPTR(pointeurpp!(0))} 48700 REM 
42100 REM Copie du rectangle défini par rec 

















Pom's n° 43 





Le GS, 


l'Apple // 
manifestement relancé la machine des 
productions freeware et shareware de 


Graphique-Son, a 


qualité. Dans ce numéro de Pom's : trois 
nouvelles disquettes de polices GS, deux 
disquettes de sons GS, une nouvelle 
disquette de jeux GS, une nouvelle 
disquette d'utilitaires GS. 


Du coup, malgré le succès que vous 
faites aux premières disquettes d'images 
GS, les suivantes sont repoussées au 
prochain Pom's (nous terminons le tri et 
le classement). 


Les disquettes de polices sont livrables 
en version 5,25" ou 3,5", puisqu'elles 
fonctionnent sur tout Apple //. Mais les 
nouvelles DPA ne sont fournies qu'en 
version 3,5" : d'une part, parce qu'elles 
ne fonctionnent que sur GS, et d'autre 
part parce que nous cherchons à ‘tasser”? 
un maximum de programmes et de 
données sur les disquettes. 





Trois nouvelles disquettes 
de polices 


Ces nouvelles polices sont en partie le complément des 
disquettes précédentes (elles fournissent par exemple des 
tailles différentes dans les mêmes polices, comme 
ZapfDingbats ou Chicago), mais elles sont aussi en grande 
partie nouvelles (des batteries de polices de toutes tailles 
intéressantes comme Boston Il, Highwood, Wall 
Street, ou des polices particulières comme Banner ct 
Banner It, qui font des affiches, les "Marquées" et autres 
qui sont décoratives, des polices de codes à barre, etc.). 

Ces polices, rappelons-le, sont utilisables comme polices 
système sur GS (en les mettant dans le sous-catalogue 
/SYSTEM/FONTS), mais aussi sur //e ou //c avec des 
logiciels comme TimeOut Superfonts, Publish-It!, 816 
Paint //e, etc. 

Le fichier AppleWorks “Font Viewer” est un fichier pour 
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TimeOut Superfonts permettant de voir sur écran ou 
imprimante les caractères contenus dans les polices. Pensez 
à changer le nom de la fonte après <1=...>. 


Le fichier FontViewer.GS (Shareware) perinet de voir ces 
polices sur écran dans les différents styles et les différentes 
tailles. Il faut pour cela être sous ProDOS 16 et avoir mis 
les polices dans le sous-catalogue /SYSTEM/FONTS de 
votre disquette système. 

Tous renseignements sur ces polices (polices Macintosh en 
fait) peuvent être trouvées dans Apple IIGS Toolbox 
Reference, Volume 2, pages 16-41 et suivantes, et... dans 
la collection de Pom's. 

Vous trouverez dans la collection de Pom's et dans les DPA 
tout le nécessaire pour éditer et travailler ces polices. 


Polices 16 


Aidous.12 - Aldous.18 - Aldous.24 - Aldous.36 - Ascham.09 
Ascham.10 - Ascham. 12 - Banner.24 - Banner.48 - Banner.lit.24 
Banner.1.48 - Barcode39.09 - Barcode39.12 - Barcode39.18 
Bocklin.40 - Bostonil.09 - Boslonil.i0 - Bostonil.12 - Boslonil.18 
Boslonil.20 - Boslonil.24 - Caclus.Deco.18 - Caclus.Deco.36 
Caclusdeluxe.48 - Charleston.10 - Charleston.12 - Charles- 
lon.14 - Charleston.18 - Charleston.20 - Charleslon.24 - 
Charleston.28 - Chicago.09 - Chicago.14 - Chubby.24 - Code.3 
.0f.9.18 - Code.3.0f.9.24 - Code.3.0f.9.30 - Copenhagen.18 
Coptic.10 - Coplic.20 


Polices 17 


Dalias.18 - Des.Moines.10 - Des.Moines.12 - Des.Moines.20 
Des.Moines.24 - Dover.08 - Dover.i0 - Dover.i2 - Eire.12 
Epsilon.t2 - Epsilon.18 - Epsilon.24 - Epsilon.36 - Eta.Medium.12 
Eta.Medium.18 - Ela.Medium.24 - Ela.Medium.36 - Finila.12 
Highwood.10 - Highwood.12 - Highwood.14 - Highwood.18 
Highwood.20 - Highwood.24 - Honda.18 - Honda.24 - Hous- 
ton.36 - icon2.38.24 - Kalona.09 - Lambda.i8 - Lamoni.09 
Lionheart.i2 - Marqueedecouc48 - Matrix.24 - Malrix.48 
McCloud.36 - Melrose.12 - Metrose.24 














36 


Polices 18 


Micro.09 + Micro.12 - Micro.18 - Micro.20 - MICRO.24 
Milwaukee.12 - Milwaukee.24 - Mix.i8 - Monaco.22.18 
Monaco.30.24 - New.Haven.48 - New.Monaco.09 - New. 
Monaco.12 - New.Monaco.14 - PhiDisplay.18 - Phi.Display.36 
Princeton.12 - Princeton.24 - Plymouth.36 - Quebec.48 
Rho.Semibo!d.12 - Rho.Semibold.18 - Riviera.12 - Riviera.24 
Sunnyvale.12 - WallStreet.09 - Wall. Street.10 - Wall Street.12 
- WallStreet.14 - WallStreet.18 - WallStreet.20 - Wall 
Street.24 - WallStreet.28 - WallStreet.36 - WallStreet.48 
ZapfDingbats.14 - ZapfDingbats.18 


DPA 019 Jeux GS Volume 2 


Une nouvelle disquette pleine de jeux pour le GS 
uniquement. Chargez-les depuis GS/OS, chacun est dans 
son sous-catalogue, Tous ces jeux sont en freeware, sauf 
Video Poker, qui est en shareware (10 dollars). Ce sont : 


1 L'inénarrable et indispensable ATLT (As The Link 
Turns) dont J. - Y. Bourdin vous parle avec tant 

d'enthousiasme dans ce numéro. 

Commentaire Pom's : Apple {| fort et vert... 

2 Fillmaze, de Jason Harper, un labyrinthe en trois 
dimensions et en couleurs, très amusant. Il est conçu 

pour démontrer une technique d'animation graphique 

appelée ‘Fill Mode’. 

Nous recommandons la lecture des notes pour le 

programmeur dans la documentation. 

Commentaire Pom's : ce jeu est conçu entre autres pour 

prouver ‘qu'il est parfaitement possible d'écrire des logiciels 

graphiques de haute qualité sur le GS sans faire des choses 

stupides, telles qu'interdire l'accès au tableau de bord, exiger 

un redémarrage en sortie, utiliser des adresses fixes sans les 

réserver d'abord”. Et il le prouve. 

3 GS Backgammon, un jeu de jaquet très bien fait de 
Phil Doto. 

Commentaire Pom's : l'ordinateur gagne souvent... 


4 Maze Creator, qui, comme son nom l'indique, 
fabrique des labyrinthes sur écran, mais surtout sur 
imprimante. Son originalité, c'est de pouvoir imprimer des 
labyrinthes de plus de 5 pages A4 de long, d'un seul tenant, 
et de la largeur d'une imprimante grand chariot ! 
Commentaire Pom's : quelques semaines pour en sortir. 
5 Music Game, de Phil Doto, est un jeu amusant pour 
apprendre les notes, Il montre aussi ce que peuvent les 
outils de GS/OS (Note Synthetizer et Note Sequencer). 
Commentaire Pom's : il montre aussi ce que peut le GS 
comme outil éducatif. 
6 Video Poker, de Todd Wood et Doug Davies, est un 
poker au sens des casinos, c'est-à-dire une machine à 
sous fondée sur des donnes de poker. Très bien programmé, 
de niveau commercial. 
Commentaire Pom's : pour ne pas perdre sa chemise à Las 
Vegas... 
Enfin, comme il restait un peu de place sur la disquette, 
vous y trouverez quelques sons GS numérisés (voir nos 
commentaires sur les ‘DPA SONS). 











DPA 020 GS Utilities Vol. 4 


Une belle série d'utilitaires GS, freeware et shareware, sur 
cette disquette. Une remarque : la vocation de nos disquettes 
DPA est de faire connaître et diffuser le maximum de bons 
programmes en freeware et en shareware pour l'Apple //. En 
conséquence, nous nous en exCusons auprès des auteurs, 
nous avons enlevé les systèmes des disquettes originales 
pour ‘tasser” le maximum de programmes sur la disquette. 


Lecteurs, nous comptons sur vous pour savoir replacer 
éventuellement les fichiers d'icônes, tes polices, les ‘Init” 
de /SYSTEM.SETUP etc., et lancer les programmes depuis 
le Finder de GS/OS ou Prosel, et aussi trouver les fichiers 
de documentation. Vous pouvez également reconstituer des 
disquettes bootables avec GS/OS. 

Deux de ces programmes vous ont déjà été présentés dans 
Apple // For Ever de Pom's 42 (pages 66-67, rubrique 
‘Vive la France”). Il s'agit de : 


1 Polyssons (version 4.2), excellent synthétiseur réalisé 
en freeware avec beaucoup d'humour par un éléphant 
Saint Cyrien. 
Commentaire Pom's : que l'humour ne cache pas qu'il 
s'agit d'un programme largement de niveau ‘pro’. Bravo 
Babar. 
2 Fontasm, de Stéphane Hadinger, le magnifique éditeur 
de fontes GS. Ce programme est en shareware à 150F. 
Commentaire Pons : lecteurs, nous comptons fermement 
sur vous pour envoyer ces 150 F à l'auteur, C'est 
considérablement moins cher que le Beagle Font Editor, et 
c'est meilleur {eh oui). Sur notre disquette, vous avez une 
version qui fonctionne, et la documentation. Mais en 
envoyant les 150 F à l'auteur, vous aurez une version plus 
complète. Si nous voulons que les programmeurs de talent 
continuent à travailler sur le GS, il faut que ça leur 
rapporte. 


Outre ces deux excellents programmes français, vous 
trouverez sur la disquette : 


3 Alarm.Cda, un excellent accessoire {frceware de David 
Hill) qui fonctionne comme réveil et/ou agenda, et vous 
‘sonne’ aux dates et heures prévues pour vous rappeler ce 
que vous avez programmé. Un gros travail de 
programmation a permis de le rendre compatible avec la 
plupart des configurations et applications. 
Commentaire Pom's : ce CDA est conçu entre autres pour 
être géré très facilement avec Jumpstart, l'excellent lanceur 
de programmes (DPA 14). L'ensemble fonctionne 
impeccablement (fonctionne aussi très bien sans 
JunpStart). 
4 CustomGSOS, une amusante application freeware 
qui vous permet de remplacer le texte et l'image qui 
accompagnent le thermomètre au démarrage de GS/@S 
(4.0), par l'image et le texte de votre choix. 


Commentaire Pos : c'est tout l'Apple {{, ça. 
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5 PrintScreen.Cda est un accessoire (freeware) tout 
simple, qui fait une copie d'écran sur imprimante de 
l'écran 40 ou 80 colonnes. 
Commentaire Pom's : le Pomme-H universel que vous 
nous avez si souvent demandé... 
6 Sauirt 16, shareware (20 dollars) de Steven 
Stephenson, est un excellent sélecteur de programmes 
ProDOS 8-GS/OS, qui a l'insigne mérite d'être peu 
gourmand en mémoire et d'être ultra-rapide, car il travaille 
en mode texte. Steve Stephenson est un excellent 
programmeur (c'est lui qui a fait les modifications à 
AppleWorks pour les cartes Checkmate Technology). 
Commentaire Pom's : depuis que le Finder a enterré le 
Program Launcher, et que Prosel a enfté en passant sous 
GSIOS, on n'avait plus de petit lanceur simple et rapide. 
GSIOS et le Finder sont prévus pour gérer 7 lecteurs par 
slot et 32 partitions par lecteur : Squirt 16 est un sélecteur 
simple pour l'utilisateur ordinaire, celui qui n'a pas 224 
volumes dans chaque slot ! 
7 StartSound, freeware de Guy Rice, vous permet 
d'envoyer un beau son numérisé au lancement d'un 
disque GS. Voëre GS démarre en vous disant bon jour. 
Commentaire Pom's : pour les sons numérisés, voir les 
autres disquettes DPA, 





DPA 021/022 Sons Vol. 1/2 


Après le ‘G’ du GS, objet des DPA 17 et 18, voici le tour 
du ‘S’ : deux disquettes pleines de sons numérisés (tous 
différents, même si les noms sont voisins). Les cartes de 
numérisation fonctionnent bien, sur GS. 

Précisons : si une carte de numérisation est nécessaire pour 
enregistrer Ces sons, il n'est besoin d'aucune carte 
particulière pour les éditer, les mettre dans vos programmes 
etc., une fois qu'ils sont sur la disquette. C'est la même 
chose qu'avec les images numérisées. 

Ce fut, là aussi, un gros travail de tri et de rangement. 
C'est volontairement que nous n'avons mis sur ces 
disquettes que peu de musiques proprement dites : pour faire 
de la musique sans saturer la mémoire, il vaut mieux jouer 
des instruments et des outils du GS (voir AmperSon dans 
Pom's 42 par exemple). 

Les sons numérisés sont donc surtout utiles comme 
bruitages, paroles, etc. 

Comment gérer tous ces sons ? On peut tout d'abord les 
éditer, pour les travailler, les couper-coller, les ralentir ou 
les accélérer, leur donner de l'écho etc. C'est l'objet de 
l'excellente application freeware SoundStudio que vous 
trouverez sur chaque disquette de sons (à lancer sous 
GS/OS). Pom's recommande aussi l'application Sound 
Shop, incluse dans HyperStudio. 

Pour inclure ces sons dans vos programmes, nous vous 
recommandons bien entendu HyperStudio : nous sommes 
dans l'ère de l'Hypennédia, nos programmes doivent 
désormais être "graphiques/sons”, et HyperStudio, comme 
Hypercard sur le Mac, est ce qui le permet le plus 
facilement. 





Mais n'oubliez pas trois autres usages de ces sons, usages 
amusants et faciles : 

- travailler sous AppleWorks GS (ou autre) avec une 
musique de fond, qui joue en même temps que vous 
travaillez (eh oui, le GS le permet) : c'est possible avec le 
NDA Background Music de la disquette DPA 11. 

- lancer un de ces sons au démarrage de la disquette : c'est 
possible avec l'Init (ou TIF : les Init du GS sont des Pif et 
des Tif) Startsound de la DPA 20. 

- remplacer le Bip du GS par un son de votre choix 
(voyez le passage sur AppleWorks-Tarzan dans Apple // 
For Ever de ce numéro). C'est ce que permet l'Init (PIF 
cette fois-ci) Sysbeep que vous trouverez sur la DPA 10. 
Essayez plusieurs sons : à l'usage. il s'avère que si certains 
sons sont lassants comme messages d'erreur, d'autres 
continuent à faire rire à chaque fois. 

Trois précisions enfin : 

- Le suffixe ‘.200”, ‘.400" etc., dans le nom du fichier 
indique la vitesse à laquelle, à notre avis, ce son doit être 
entendu. Mais bien entendu, une des premières choses à 
faire avec SoundStudio, c'est de faire varier cette vitesse, 
pour s'amuser. Cette valeur est déposée dans le type 
auxiliaire du fichier. 

- Beaucoup de ces sons, en particulier les plus courts, 
doivent être entendus en répétition permanente (icône 
circulaire dans SoundStudio), car ce sont des 
"Tac-à-tac-à-tac’ genre bruit de machine à écrire ou de 
mitraillette. 

- N'oubliez pas que la sortie son du GS accepte un casque 
stéréo : la famille n'apprécie pas toujours quand vous 
bricolez vos sons sur le GS... 


Liste des sons DPA 021 


Aucun.Prob - Battement - Bris - Bruit.i - Bruit.2 - Bruit3 - 
Bruit.4 - Bruit.S - Bruit.6 - Bruit.7 - Canon - Chasse.d Eau - 
Clic.t - Clic.2 - Clong - Coq - Corne.t - Corne.2 - Corne.3 - Coup 
- Cri - Cymbale - Explosion - Fanfare - Fantome - Finale - Gong - 
Grincement.t - Grincement.2 - Harpe - Have.Fun - Helico - 
Hello.Computer - Horloge - Machine.1 - Machine.2 - Mitraillette - 
Mitraiïlleuse - Moteur - Orgue - Ouahh - Peek.Again - Pistolet - 
Plouf - Police - Poussons - Ramponneau - Rebond - Roulement - 
Sonnerie - Tonnerre - Welcome - Woaar - Woops 


Liste des sons DPA 022 


Aigu - Boeing - Boum.1 - Boum.2 - Brouit - Bruitage - Chuchotis 
- Cloche - Clochette - Craquement.i - Craquement.2 - 
Craquement.3 - Crash - Cymbale.2 - Ecroulement - Flute - 
Frappe.i - Frappe.2 - Frappe.3 - Frappe.4 - Frissons.i - 
Frissons.2 - Frissons.3 - Game.Over - Gemissement - Grillon - 
Jappe - Klaxon - Metal - Puise - Radar - Rire.f - Rire.2 - Rire.3 
- Sonnerie - Sonnette - Tambour. - Tambour.2 - Tarzan - Tir.i 
- Tir.2 - Tir8 - Trompettes - Vibrationi - Vibration2 - 
Vibration.3 - Vibration.4 - Vulcan.Mind 


Cetie disquette contient également 10 sons issus du Mac : 
ce sont ceux de la disquette Pom's 41 pour le Mac. Pour 
toute documentation sur ces sons, voir Pom's 41 (la Pate 
Mac : toutest bon dans Pom's, i fauttout lire). 
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7.-T. Bourdin 


Les lecteurs de Pom’s vont devenir Ré érlat oct 

les spécialistes de l'éjection des ecaplturation EJEC 

disquettes 3 ! Après l'art et la Âprès avoir saisi Ces codes s0 us moniteur, 

manière d'éjecter depuis le Basic, vous les sauvegarderez par : 

t . create efect, t$39 

l'assembleur, MacPro, depuis ; bsave eject, aS2000, LSI48, TSB9 

AppleWorks ou depuis Prosel via un 

e e = ne 2000:4B 01 00 00 00 00 00 00 EA 00 00 00 00 CA 04 02 

on voicrun 2010:00 00 01 00 00 10 00 00 00 00 00 00 00 00 00 00 

mini- s 2020:00 00 01 00 00 00 00 00 2C 00 40 00 45 4A 45 43 
: 2030:54 20 20 20 20 20 45 44 45 43 54 20 20 20 20 20 

II trouvera Sa place dans le dossier 2040:F2 EA 00 00 00 0B 47 72 69 6C 6C 65 2D 50 61 69 


DESK.ACCS des disquettes GS. li 2050:6E 94 00 00 00 AC 00 00 00 00 00 00 00 00 00 00 


H 2060:00 00 G0 00 00 00 00 00 00 00 00 00 00 00 00 00 
suffit alors de faire G-ctrl-esc pour 2070:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 


voir le nouvel accessoire de bureau 2080:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
dns ns : 20$0:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
grille.pain’ prêt à éjecter le disque 20A0:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
situé en port 5 lecteur 1. 20B0:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 


20C0:00 00 00 00 00 G0 00 00 00 00 00 00 00 00 0 90 


Bi d : do: le b d'éiccti 2020:00 60 00 00 00 00 00 0G 00 48 AB 38 FB E2 30 20 
ien entendu, c est un samedi soir que le bouton d CjCction 20E0:AD 00 20 BC 00 22 00 20 00 20 CB 00 18 FB C2? 30 


de j’un de mes lecteurs 3,5” a choisi pour rendre l'âne : pas 20r0:6B 6B A2 00 BF 00 20 00 9D 14 00 E8 F0 80 DO F4 

de SOS-Loiseleux possible. En attendant, puisque le lecteur 2120:60 A2 00 BD DA 00 9F 00 20 00 E8 E0 80 DO F4 60 

acceptait toujours d’éjecter par soft, je me suis fait en 2ii0:A2 00 BD 14 00 9F 00 20 00 E8 E0 80 DO F4 60 20 

vitesse-0n'mini-CDÀ' pour DOUNOIr é Ecler amende 7700069017 07 2068703 094,982, 09,00 09 00,00 F7 

= à 2:30:08 00 00 00 00 05 98 9E AS 84 BF CE F5 03 00 10 
n'importe quel programme, sans quitter le programme.  ;,,5.00 ac 00 F5 03 00 0c 00 94 00 00 

| Vous trouverez cet accessoire, avec le source (Merlin 16), 

| sur la disquette Pom's. . 

| Attention, cet accessoire n’est en fait qu’un patch : il ne Source Eject.S 

| vérifie rien, il n’affiche nien, il éjecte le disque en slot 5, Merlin 16 

| drive 1, c’est tout (si vous l'avez mis dans le 

sous-catalogue /SYSTEM/DESK.ACCS de votre disque 





REL 


système, bien sûr). DSK  EJECT.L 
La seule chose intéressante dans le source, c’est le truc TYP  CDA 
employé pour utiliser le banc zéro : le SmartPort exige MX +00 ; assemblage 16 bits 


d’être appelé en mode huit bits depuis le banc zéro. Comme 
on ignore où l'accessoire est placé en mémoire, on copie  2ANX0 
80 octets de la page zéro dans un tampon à l’intérieur de 
l'accessoire, on copie le code d’éjection dans le banc zéro, 
on l’exécute, puis on recopie le tampon dans le banc zéro. 


$002000 


r Entête du CLDA 





Dernier détail, si vous voulez qu'il éjecte du drive 2, mettez STR  ‘Grille-Pain' 
02 à la place de 01 en S2127) : ADRL START ; Adresse point d'entrée 
ADRL EXIT ; Adresse routine sortie 


La routine d'éjection proprement dite gagnera à être *======22==2-22-2---mmmmmmnnnnmmmmmm == 
généralisée pour fonctionner avec tout type de contrôleur BUFFER DS $80 
(en n'appelant pas directement $Cn0B) et tous SNS PE ST TT 


ports/lecteurs. Là, à vous de jouer, le squeleuie est donné... START PAK  Récupère banc Progr 
2 PLE ; ÿ fixe le banc données 
(fe SEC | 
XCE 
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SEP $#00110000 ; registres 8 bits 
USR SWw2P1 ; met 00/2000 äs buffer 
YJSR SWAP2 ; transporte routine 
d'éjection 
USL BANKO ; éjecte depuis barc 0 
JSR SWAP2 rétablit 00/2000 
CEC / pessage en 16 bits 
XCE 
REP $00110000 
RTL 
EXIT RTL 
RE ee RS eee 
MX #11 ; assemblage 8 Bits 
SWAP1 LDX £0 
LUP LDAL BANKO,X 7; sauve ie #anc 0 
STA BUFFER,X 
INX 
CPX £$80 
BNE 2: LUP 
RTS 
KESSSSSSSSSSSSS-SSARSSARSARRRE EEE 
HX $11 ; äassembiage 8 its 
SYIAP2 LDX £0 
:LUP LDA JECT,X ; met ia routire 
d'éjection en banc C 
STAL BANKC,X 
INX 
CPX £$80 
BNE LUF 
RATS 
KemmmmumnsmmcemmEmemmeRSSSSE=====Remmm=========== 
MX #ii ; assemblage 8 bits 
SWAP3 LDX £0 
:LUP LDA BUFFER,X » rétabiit le banc © 
STAL BANKC,X 
INX 
CPX £$80 
BNE LU?» 
RTS 
ja RE ET 
MX $11 ; äassembiage 8 #its 
EJECT ORG $2Z000 
JSR $C505 f_Siot 5 





TOOLBOX 


35, Bld Richard Wallace 
92800 Puteaux 
& {1) 47 72 27 36 ou {1] 39 89 57 21 
Une coopérative d'achats pour les utilisateurs de l'Apple 2 





Disque dur 32MB Temps d'accès 40 Ms - SCSI 6000.00 Fr (TTC) 
avec carte SCSI ProDOS 8 - ProDOS 16 - GSOS 








HyperStudio HyperCard sur 
avec notice Apple IN GS 1220.00 Fr (TTC) 
en français 











Tous les logiciels de qualité sont disponibles chez TOOLBOX 


HyperStudio - Merlin 8/16+- Publish it! - ProSel16 - Instant Synthe 
- TML Pascal - AppleWerks GS - PrintShop GS, etc... Arkanoïd - Test 
Drive - Sword of Sedan - Dungeon Master - Rocket Ranger- Zany Golf 
- Skate or die, etc. 


Documentation française complète et support technique sur nes 
produits 


Programmes FreeWare et ShareWare 


Reprise des logiciels achetés chez TOOLBOX 


Catalogue de cartes d'extension - Libratrte 


Cours d'initiation : Système ProBOS/GSSS - AppleWerks + Time- 
Out - Langages 


Adhésion pour ? an : 250,00 Fr. 


Demander contre 30,00 Fr notre catalogue complet de produits 





DE PARMI 
RTE 
: PARMI DFE £$03 
DF £$0i ; drive 1 
DA : FARM2 
: PARIZ DFB £$O8 
DA $0000 
DA $C002 

















Si des signes vous échappent *, si vous ne trouvez 
pas # en New-York, si Ÿ vous aurait bien rendu 
service, si les maths Z ou les finances Y vous em- 


brouillent le traitement de textes : 


XTRA FONTS 


En plus de son éditeur de polices, 
ExtraFonts imprimera en COULEURS 
sur votre ImageWriter II... 











RESSEMBLENT \ 
TROP AU "5" / 
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La récente mise en shareware de ce 
programme -voir les news de ce 
numéro- fait d'ADN une alternative, 
très attractive en matière de program- 
me de SGBD. 


Tel que le dit Claude Colin son 
concepteur, ADN se veut plus qu'un 
simple programme de ce type. Il serait 
partiellement incorrect, et d’ailleurs ce 
n'est pas dit, d'affirmer qu’'ADN, 
arrive à casser les étiquettes sous 
lesquelles sont classifiés les pro- 
grammes, pour en faire un programme 
à tout faire. Ça a été un petit peu le 
problème d'HyperCard, que de dire que 
l’on pouvait tout en faire, et tellement 
tout, qu’on en faisait plus grand 
chose. Mais malgré ses airs de 
facilités, ne vous y fiez pas, ADN est 
uès puissant. 


Tout commence 
par un bureau 


Dès le lancement d'ADN, vous vous 
retrouvez devant une fenêtre à la 
Finder, qui affichera les fichiers et/ou 
applications ADN ouverts. Au fur et à 
mesure de l'ouverture des bases ADN, 
le menu Accès s'enrichit du nom de 
ces bases, et il est possible de lancer 
une application ADN sans repasser par 
le Finder. Jusqu'à vingt-quatre fichiers 
peuvent être ouverts simultanément 
pour une même application. 


Le mode 
utilisation 


Comme tout SGBD qui se respecte, 
ADN permet une utilisation à un 
niveau bas à savoir le fonctionnement 
d’une application déjà programmée, et 
donc de manière totalement transpa- 
rente, c'est-à-dire avec des menus et 


fenêtres propres à l'application. Le 
niveau haut permet, lui, la program- 
mation de la base. 


Le mode 
modélisation 
Une chose à noter lors d’un premier 


contact avec ce mode, est qu’à aucun 
moment ADN ne fonctionne en 





é Fichier Edition Objets 





BOUCLE 1.Z 


CALCUL [Fx #]= [MonNembre] 
CALCUL [Sc®%]= [MonNombrel 


Langoge VE 
Termes pricipaux — — 
Programmation 
Base de données 
Affichages et curseur ISNON 








mise à jour d’un fichier sur l’autre 
n'est pas automatique et doit passer 
par la programmation. 

Tout est objet dans un format, on 
pourra dès lors associer un script à 
n'importe quel objet. 


Ces scripts seront entrés par l'éditeur 
de scripts après choix de l'objet 
concerné. L'éditeur permet de réduire 
au minimum la saisie au clavier par la 













LALORS 


Si [*[ +3 Images et sons CALCUL 

ALORS Mathématiques ISELECT 

: ne [Fin *1= [MonNombre] Riphanumériques FA LASSE 
FINECL Temps et évènements } {| rnc 
Communications JINDEX 










EP) Fichier : 





structure rigide, avec la nécessité de 
définir la structure des fichiers et 
éventuellement des liens unissant les 
fichiers. C’est lors de la création de 
formats que l’on indique si les rubri- 
ques créées doivent appartenir à un 
fichier, ou à un simple document qui 
peut n'être qu’une feuille unique de 
travail, fixe ou variable. C’est lors du 
passage à l’utilisation, qu'ADN va 
faire sa cuisine d'organisation des 
rubriques et d'éventuels index. Cette 
méthode permet de créer extempo- 
ranément des rubriques dans un fichier. 
Les liaisons se font dans ADN, par 
appel dans un format à une rubrique 
d'un fichier différent. Toutefois, la 


Impressions et sorties 


Procédures externes. 
Réserve. 


ea 


Q0)C asus Ci] Lei. 
ia Benne 


aïph1 
alph10 
atph11 


sélection des mots-clef et des objets 
par des menus et listes. À noter qu’à 
n'importe quel niveau d'ADN, on 


dispose d'une aide en ligne 
extrêmement complète. Il suffit de 
choisir pour cela le mode ‘Aide’ et de 
sélectionner l'article de menu ou le 
terme de programmation sur lequel on 
désire plus d'informations. 

ADN possède en outre un objet 
particulier appelé pictogramme. 
Schématiquement cela consiste à avoir 
une zone image variable, en fonction 
des données d'un fichier, C'est par ce 
biais que peuvent être générés des 
graphiques en deux ou pseudo trois 
dimensions. Des exemples sur les 





TN 
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disquettes d'accompagnement mon- 
trent ce que l’on peut en faire, ct en 
couleurs, les résultats sont plus 
qu'intéressants. 

Les termes de programmation 
proprement dits, sont proches du 
langage naturel, et offrent des 
possibilités complètes. Toute la 
puissance du Mac s’y retrouve, depuis 
les commandes de bases de fichiers 
jusqu’à la gestion des communications 
avec les gros systèmes. Si ayant 
atteint un haut niveau de program- 
mation, il manque une commande, il 
est toujours possible de l’ajouter par 
l'intermédiaire de commandes ex- 
ternes, écrites dans des langages de 
base, comme le Pascal, le C, ou 
l’assembleur. 

La programmation objet surprend un 
peu à ses débuts, puisqu'il arrive 
parfois que l’on sache plus très bien à 
quel objet on s'adresse, mais un peu 
d'habitude permet de rétablir ce petit 
défaut. 

L'utilisation d’un format créé, ne 
souffre pas de remarques particulières, 
et des menus complets permettent de 
naviguer dans les fichiers. Le passage 
d’un format fiche à un format liste, 
n’est pas à première vue évident, mais 
une fois acquis le fonctionnement, on 
se rend compte que ce format permet 
de sortir des informations statistiques 
sans programmation là où les 
programmes similaires en demandent 
un minimum. On ne peut pas qualifier 
la rapidité d'ADN d’hors du commun, 
mais elle reste dans des limites raison- 
nables. 

En conclusion ADN surtout au prix 
auquel il est proposé désormais, est un 
redoutable outsider. Puissant, et facile 
d'utilisation, il peut largement être 
une altemative à HyperCard, lorsqu'on 
veut utiliser ce dernier comme 
gestionnaire de bases de données. 
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Population 1 


Evolution 





Saisir un nombre puis cliquer. 


O dec 
2 dec 


9 dec 1250.000000 


Saisir une date puis cliquer. 


—— Court ss 


21/10/55 


Saisirunmat puis cliquer. 


Poms 
POTIS 
Pom's 
Pem'e 
Pom's 


Réduit 
21 Octob 1955 


Graph_3D 


Ariel Sebban 


1230.00000 


125e+3 


—— Scientifique mm Financier 


les3 1 250F 
1 250,00F 


1.250000000 


21/10/55 


Cliquez Ici... 


— Long 
21 Octobre 1955 


Pon's 
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Grâce à la mémoire virtuelle, le Macintosh va pouvoir 
disposer pour travailler de beaucoup plus de mémoire (ceile 
indiquée par le À propos du Finder...) qu'il n'y en a 
réeliement dans la boîte (le nombre de SIMMS installés). 
Cependant, cette innovation nécessite une Paged Memory 
Management Unit (PÎMMU) qui est contenue dans le 
68030, ou dans un coprocesseur ajouté au 68020 : le 
68851. Comment cela fonctionne-t-il ? 


Rappels sur 

le fonctionnement 

du processeur 

En simplifiant un peu, on peut considérer le processeur 
(CPU), l'ensemble de la mémoire (RAM) et la PMMU 


comme des boîtiers munis de broches et reliés entre eux par 
des fils : 


P 
pen M ï 
C | Logica M | physicai 
P U Address Bus 


Address Bus 


Data Bus 


Remarque: dans le 68030, la PMMU est physiquement 
située dans le boîtier du CPU, la partie gauche du schéma 
n'est donc pas observable concrètement, bien qu'elle soit 
encore valable. 


Ü 


Faut-il rappeler que la fonction unique du processeur 
amsise à manipuler des données, en les lisant à partir de la 
RAM et en les y écrivant ensuite ? Pour ce faire, il doit 





Alain Raynaud 


donner les paramètres de l'opération à effectuer par 
l'intermédiaire des bus, qui ne sont rien d'autre que des 
lignes électriques groupées. Par exemple, si le CPU veut 
écrire le long $753 à l'adresse $10000, il indiquera 
S00010000 sur le bus adresse et 5088600753 sur le bus 
donnée. 


Avant la mise en œuvre des mémoires virtuelles, l'adresse 
spécifiée par le processeur correspondait exactement à 
l'adresse de la mémoire lue. L'astuce qui permet la mémoire 
virtuelle, c'est d'intercaler sur le bus adresse un composant 
qui modifie l'adresse indiquée par le CPU. Cela signifie que 
si ie processeur demande à écrire à l'adresse $10000, la 
mémoire elle, recevra une demande d'écriture pour une autre 
adresse. Voila comment on définit alors la notion d'adresse 
logique et adresse physique : l'adresse logique est celle que 
le processeur indique, l'adresse physique est celle que la 
mémoire reçoit. 


Translation des adresses par 
la PMMU 


La translation est l'opération qui consiste à transformer 
l'adresse logique en adresse physique. Bien sûr, c'est au 
programmeur de définir comment elle est effectuée par la 
PMMU. Celle-ci dispose des trois registres : CPU ROOT 
POINTER, DMA ROOT POINTER et SUPERVISOR 
ROOT POINTER qui pointent chacun vers une table, qui 
sera utilisée en fonction de la provenance de la demande de 
translation : accès CPU, BMA ou Superviseur, Le plus 
simple est que ces trois registres pointent vers {a même 
table, mais dans certaines configurations, on pourrait être 
encore plus subtil en différenciant la zone mémoire obtenue 
et limiter ainsi, par exemple, les accès DMA à certaines 
zones. Ce n'est pas la cas pour la Mémoire Virtuelle pour 
Macintosh : il y a une seule table. 


Cette table indique, pour chaque tranche de la mémoire que 
le CPU peut adresser, la #ranche correspondante telle qu'elle 
doit être vue par la mémoire. Chaque tranche, ou page, a 
une fargeur choisie parmi les valeurs suivantes : 256 
octets, 512 octets, 1, 2,4, 8, 16 ou 32Ko. @n réalise alors 
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qu'il faudrait beaucoup d'entrées dans la table pour coder 
tout l'espace adressable par le 680x0 : au moins 130 000. 
En fait, la structure de cette table est assez complexe car 
elle peut être ramifiée (c'est-à-dire sous forme d'arbre), ce 
qui permet justement de ne pas devoir fournir une chaîne 
linéaire de 130 000 valeurs ! D'autre part, il faut bien 
comprendre que cetie table doit être remplie avant que la 
translation ne soit mise en marche. Ensuite, pour chaque 
instruction que le processeur exécutera, la PMMU 
effectuera seule les translations nécessaires en explorant la 
table adéquate, sans que le processeur ait à intervenir de 
quelque façon que ce soit. 


La table résidant en RAM, et ayant une structure en arbre, 
la PMMU peut mettre beaucoup de temps avant de trouver 
la translation qui s'applique. Parfois, cela peut durer 80 
cycles, ce qui est considérable, Pour éviter ce type d'ennuis, 
qui reviendrait à multiplier par au moins deux ou trois le 
temps d'exécution de chaque instruction, la PMMU 
dispose d'un cache interne qui contient les 64 dernières 
translations utilisées. Lorsqu'on fait appel à l'une d'elles, 
elle est pratiquement instantanée, ce qui explique qu'en 
période d'exploitation normale, la mémoire virtuelle ne 
ralentit pas le processeur. C'était le but recherché. 


Réalisation de la Mémoire 
Virtuelle 


Avec tout cela, comment réaliser un système qui utilise 
l'espace disponible sur disque pour augmenter la capacité 
mémoire ? Admettons qu'on veuille réaliser un système qui 
utilise 2 Mégas de mémoire réelle peur le transfonner en 4 
Mégas de mémoire virtuelle. Le constat de fonctionnement 


est le suivant : à un instant donné, seul 2 Mégas sont 
accessibles, surles 4 censés exister. 


Mémoire 
réelle 


Mémoire que le 
processeur croit adresser 





Translation 
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Premier principe : grâce à la translation des adresses, 
les 2? Mégas disponibles sont accessibles par le processeur, 
bien que les adresses physiques et logiques ne correspondent 
pas. 


Deuxième principe : les 2 autres Mégas sont marqués 
indisponibles. Lorsque le processeur essaye de les adresser, 
il reçoit une exception : Bus Errer. Une routine sauve tout 
d'abord une zone mémoire (la moins utilisée en principe) 
sur le disque, charge alors à partir du disque la zone 
mémoire à laquelle le processeur veut accéder (en la mettant 
à la place de la zone sauvée), puis change la table de la 
PMMU afin que cette nouvelle zone soit reconnue. Enfin, 
elle indique au CPU de reprendre ses activités comme si 
rien ne s'était passé. Ce swapping de la mémoire (en réalité 
par petits blocs de 32Ko) est possible grâce à la facilité 
qu'ont les 680x@ de pouvoir recommencer uncycle d'accès à 
la mémoire de façon transparente après une erreur. 


Conclusion 


En fait, la deuxième étape est la plus compliquée, car il 
s'agit d'écrire une routine d'exception, qui doit donc ne 
toucher théoriquement à rien. Cependant, elle est bien 
obligée de manipuler le disque, ce qui peut poser des 
problèmes d'incompatibilité avec certains programmes qui 
manipuleraient le disque en même temps. 

De même, les debuggers qui manipulent la PMMU aiors 
qu'ils font des accès mémoire risquent de ne pas apprécier 
du tout. Mais comme c'est Apple qui a écrit tout ça, nul 
doute qu'il fera de nouvelles versions ‘compatible Mémoire 
Virtuelle”. 


D'autre part, le temps perdu par la mémoire virtuelle sous 
MuitiFinder sera camouflée par la méthode d'utilisation : 
on aura chargé en même temps plusieurs applications 
‘mémon vores', mais une seule sera active à la fois. 


La mémoire virtuelle ne fera perdre du temps que lors du 
passage d'une application à une autre. Or, ce passage prend 
déjà du temps au niveau du MultiFinder, donc la perte de 
quelques dixièmes de secondes supplémentaires sera 
invisible. Mais on gagnera la possibilité d'avoir beaucoup 
d'applications chargées simultanément (alors qu'en réalité 
elles resteront sur disque). 


Bibliographie 


Pour en savoir plus, on lira avec intérêt les bibles 
Motorola : 


MC68851 Paged Memory Management Unit User's 
Manual — Prentice Ha!i 


MC68030 Enhanced 32 Bit Microprocessor User's Manual 
—- Prentice Hall 
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Le livre d'AppleTalk, par Jean-Pierre Curcio 
et Jean Robberecht, Editions du PSI — 49ï pages 
— 310,00 F 


La bible de tout ce qui touche à la communication 
autour du réseau AppleTalk, mais sans se limiter 
au monde Apple. La première partie de l'ouvrage 
concerne les utilisateurs et représente à elle seule 
l'équivalent d'un bon livre (260 pages). La 
seconde partie est purement technique et — partant 
— illisible pour l'utilisateur lambda du Mac, mais 
elle ravira certainement tous ceux qui mangent du 
câble au petit déjeuner. 


Wingz - Tableur et Wingz - Graphiques, 
fonctions de calcul, par Nathalie Barbary, 
MémoMac Cédic/Nathan — 64 pages et 55,00 F 
chacun 


Ce sont des aide-mémoire comportant en outre un 
certain nombre de conseils d'utilisation et 
d'astuces. Dans cette collection, les ouvrages sont 
de qualité inégale (certains ne sont que des 
résumés de la documentation) mais, nous l'avions 
déjà remarqué avec Excel, Nathalie Barbary a bien 
travaillé et ses MémoMac sont utiles. 


Le Macintosh Professionnel —- Le premier 
guide évolutif de la Micro Mac, par Hervé Thiriez, 
Jean-Christophe Krust et Philippe Mathieu, 
Editions WEKA — 600 pages — 895,00 F TTC 
(760,00 lors de la promotion initiale) 


Le Macintosh évolue sans cesse, de même que les 
logiciels qui lui sont destinés. Il devenait 


Alexandre Duback. 


indispensable d'avoir un ouvrage qui suive cette 
évolution de façon régulière. C'est le cas avec 
cette bible de l'utilisateur Mac qui sera suivie — 3 à 
4 fois par an — d'additifs de plus de 200 pages 
chacun. 


Les auteurs de cet ouvrage ont déjà neuf autres 
livres sur le Macintosh : ils sont donc parfaitement 
qualifiés. La maquette est agréable, le plan du 
livre très clair, et un index détaillé permet de s'y 
retrouver facilement. En outre, les auteurs 
proposent de nombreux conseils d'utilisation et 
astuces. 


En plus, je ne peux pas dire du mal de mon 
rédacteur en chef ; il serait capable, en deux coups 
de souris, de me mettre à la Corbeille et de Vider 
la corbeille ! 


Le livre d'Illustrator, par Olivier Castelli, 
Editions du PSI — 357 pages — 295,00 F 


Tout ce que vous avez jamais voulu savoir sur 
Illustrator, avec une maquette originale et de très 
nombreuses illustrations qui mettent en relief les | 
possibilités graphiques de ce logiciel. Le principe 
général est simple : les pages de gauche | 
contiennent des illustrations et les pages de droite | 
le texte, à raison en général d'un thème par paire | 
de pages. C'est un livre splendide avec tout ce 
qu'il faut pour s'y retrouver (renvois dans les | 
marges, index avec lexique, tables des matières à 
plusieurs niveaux, .…). Enfin un auteur qui prend 
ses lecteurs au sérieux ! “ 





Apple Expo 


DU MERCREDI 27 SEPTEMBRE AU 
SAMEDI 30 SEPTEMBRE 1989 





CNIT — PARIS LA DEFENSE 





POM's VOUS ACCUEILLERA SUR SON STAND 
(M9) AU GRAND RENDEZ-VOUS ANNUEL 
D'APPLE. 


ECONOMISEZ LE PRIX DE L'ENTREE (70,00 F) 
EN NOUS DEMANDANT UNE INVITATION 
(VOIR PAGE 71). ELLE VOUS PERMETTRA 
EGALEMENT DE RECEVOIR A DOMICILE 
VOTRE BADGE MAGNETIQUE INDISPEN- 
SABLE À UNE VISITE FRUCTUEUSE. | 
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Les utilitaires Symantec ne sont 
pas des nouveautés, mais nous 
n'avions pas encore eu le temps 
de vous en parler. Voici donc 
enfin un banc d'essai de ces 
utilitaires qui vous permettent 
respectivement de : 


* protéger le contenu de votre 
disque dur ; 

* TÉCUPÉTET 
perdues ; 

* optimiser le fonctionnement 
de votre disque dur ; 

+ créer des volumes sur le 
disque dur ; 

* copier des disquettes plus 
rapidement ; 

* intervenir directement sur le 
contenu d'un disque dur. 


matoût Célamse faisant 
simplement à partir d'un 
programme qui joue le rôle de 
centrale de distribution de vos 
requêtes. 


des données 


Présentation générale 


Les utilitaires sont fournis sous 
la forme d'un manuel de 180 
pages et de deux disquettes 
enfichées dans la troisième de 
couverture. Des explications 
détaillées sur la façon de copier 
les fichiers sur votre disque dur 
sont fournies dans Ja 
documentation. Une fois 
l'installation terminée, vous 
avez un dossier ‘Disk Clinic'M” : 


C'est l'application Disk Clinic 
qui effectue le lancement des 
autres applications, bien que 
rien ne vous empêche de les 
lancer directement si vous le 
préférez, à condition que vous 
sachiez bien ce que vous faites. 


Nous allons passer en revue les 
différents programmes 
constituant l'ensemble des 
utilitaires de Symantec. 


Guardian 


Ce programme est le plus 
original de la série, et c'est 
probablement la principale 
raison d'achat du produit. 
Guardian offre quatre sécurités : 
la protection d'un volume contre 
des virus ou des destructions 
accidentelles, la restauration 
d'un disque écrasé, la 


Disk Clinic'” 
18 634K dans disque 





10 éléments 
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Disk Clinic 
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a 
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HFS Recoyer 


5) Signatures 
[= | 
Symantec Tools 
HFS 
= 
x1x}} = ES 
Disque Hervé 
(12) 


Fleppy Recover 


538K disponibles 





H, Thiriez 


restauration de fichiers écrasés 
par erreur, et la restauration 
d'un disque initialisé par erreur. 


Quand Guardian a été installé 
sur votre disque dur, où il 
occupe moins de 1 % de la 
place, il garde une #race de vos 
opérations sur les fichiers, de 
façon à pouvoir par exemple 
restaurer un fichier ‘poubellisé” 
par erreur. Il possède une liste, 
dont la mise à jour se fait 
automatiquement, des 100 
derniers fichiers que vous avez 
effacés. 


Les paramètres de Guardian, 
accessibles grâce à son Init 
appelée Shield, vous permettent 
de garder chacune des options 
suivantes active Ou non : mise à 
jour de la liste des fichiers 
effacés, mise à jour du catalogue 
de votre volume (et 
d'informations permettant de 


mieux le récupérer en cas 
de problème grave), et 
protection du volume. 


Bien entendu, plus vous 
K>} demandez de protection, 
plus le fonctionnement du 
Mac estralenti : il y a donc 
un équilibre à trouver 
entre protection et rapidité 
de fonctionnement. 


Sans rentrer dans trop de 
détail, nous pouvons dire 
que Guardian apporte une 
bonne sécurité de fonc- 
tionnement, mais que — 
{7| lorsque toutes les options 
sont actives — le ralentis- 
sement de fonctionnement 
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du Mac est sensible. 


HD TuneUp 


Cette application sert à améliorer 
les performances du disque dur 
en "dé-fragmentant” les fichiers. 
En effet, plus un disque dur est 
proche de la saturation, plus les 
fichiers sont mémorisés par 
morceaux non consécutifs, le 
Finder sachant quand même 
heureusement s'y retrouver. 


Ce programme reprend tous les 
fichiers et essaye de les 
réenregistrer dans des zones 
connexes du disque dur. Pour 
qu'il soit performant, il est donc 
efficace de commencer par 
copier du disque dur (sur des 
disquettes de sécurité) un ou 
deux gros fichiers que l'on 
détruira du disque pour y faire 
de la place, et qu'on remettra 
après la réorganisation du 
disque. 


Ce programme marche bien, 
mais il est hélas incomplet. 
Après avoir utilisé HD TuneUp, 
j'avais essayé de créer une 
partition de 3 Mo, alors qu'il 
restait plus de 5 Mode libres sur 
le disque. Le programme de 
partition m'a répondu qu'il n'y 
avait pas assez de place : en 


| effet, HD TuneUP défragmente 


les fichiers, mais ïil ne 


reconstitue pas les disque en 
regroupant tous les espaces 
libres ensemble ; vous pouvez 
alors avoir 5 Mo de libres, sans 
qu'il n'y ait de zone de 3 Mo 
consécutifs qui soit libre et vous 
penmette de créer une partition. 


Pour tout regrouper sur un 
disque, il faut utiliser un 
programme comme Disk 
Express, qui ne fait hélas pas 
partie du package Symantec. 
Sans un tel programme, HD 
TuneUp perd une grande part de 
son intérêt. 


HD Partition 


Cette application sert à créer des 
partitions sur votre disque dur, 
avec ou sans mot de passe, 
montables ou non au démarrage 
du Mac. Un tel utilitaire est très 
utile avec un disque dur de 20 
Mo et indispensable avec tout 
disque de 40 Mo ou plus. 


QuickCopy 


Ce progiciel est présenté comme 
un programme de copie 
extrêmement rapide. Pour ma 
part, je ne lui ai pas trouvé de 
rapidité particulière par rapport à 
d'autres programmes de copie 
en ma possession, certains 
mêmes fort anciens. 
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HFS Recover, Scanner 
et Floppy Recover 


HFS Recover est déjà connu de 
la plupart des utilisateurs du 
Mac. Ne perdons donc pas de 
temps à én parler : Cest ün 
excellent logiciel de récupération 
de fichiers et de disquettes, en 
tout cas largement supérieur à 
l'incompétent ‘SOS Disque” 
fourni par Apple, qui ne m'a 
jamais récupéré quoi que ce soit. 


Pour aller plus loin, quand HFS 
Recover ne suffit pas, vous avez 
deux autres utilitaires de 
récupération, Scanner et Floppy 
Recover. Gageons que si vous 
avez une disquette foireuse qui 
résiste à ces trois produits, vos 
chances de la récupérer sont 
bien faibles. 


Symantec Tools 


Notons enfin l'éditeur de 
secteurs Symantec Tools, un 
produit réservé aux bidouilleurs 
et autres développeurs. Ce 
produit permet de consulter un 
fichier ou un disque dur, au 
caractère près, et de modifier ce 
que l'on veut. C'est parfait pour 
rendre votre disque dur illisible, 
si vous l'utilisez sans 
discernement. 


Conclusion 


Les Symantec Utilities sont 
vendues par BR Publishing, au 
prix modique de 1 490,00 F 
HT. Dans l'ensemble, ces 
utilitaires sont une petite mine 
d'or. Quand on voit ce que peut 
coûter l'impossibilité de relire 
une disquette, a fortiori un 
disque dur, on réalise que l'on 
peut se les offrir sans hésiter. 


La documentation est claire et 
les programmes conviviaux. 
Mon principal regret est 
l'absence dans ce package d'un 
utilitaire comme Disk Express. 
À good buy ! Good bye ! 
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Jean-L c Bazaneque 


Jusqu'à présent, lies programmes que l'on pouvait 
trouver dans Pom’s —pour le Macintosh—- était 
écrits essentiellement en Basic ou en assembleur ; 
cette démonstration de l'utilisation du ‘Color Picker 
Package’ est en C —LightspeedCTM pour être 
précis— langage qui monte non sans raison : 
souplesse et portabilité du langage, développement 
du système Unix... 


Bien que le source de Ia démonstration soit écrit en 
LightspeedC®M, il est entièrement compatible avec les autres 
langages C disponibles pour le Macintosh, y compris celui du 
‘Workshop’ Apple. Nous avons choisis LightspeedCT# pour sa 
facilité d'utilisation (il n'est pas nécessaire de lire une 
documentation de 200 pages pour savoir comment on met en 
place le ‘shell’), son débugger performant, la possibilité 
d'écrire des accessoires de bureau ou autres drivers sans avoir 
recours à l'assembleur, et bien d'autres choses qui facilitent la 
vie du programmeur. 

Le programme ‘Palette’ ne fait certes pas grand chose d'autre 

qu'une démonstration ; il peut cependant servir de noyau pour 

le développement de vos propres applications. Vous n'aurez 
ainsi pas à passer par l'étape de l'écriture de la gestion des 
événements, opération tou jours un peu délicate. 

Le ‘Color Picker Package’ est une fenêtre de dialogue 

extrêmement bien conçue, utilisée à chaque fois que 

l'utilisateur a besoin de choisir une couleur. C'est le cas, par 
exemple, de l'option Ceuleur du Tableau de bord. L'appel du 
dialogue en C est particulièrement aisé : 

+ __ondéfinit une variable de type ColorSpec (adresse pointant 
sur les trois couleurs fondamentale rouge, vert et bleu), ou 
deux variables si l'on veut conserver en mémoire l'ancienne 
couleur : 

ColorSpec AncienneCouleur; 
ColorSpec NouvelleCouleur; 

+ on définit une variable (locale généralement) indiquant la 
position de l'angle supérieur gauche du dialogue. 0, 0 
permet d'obtenir un centrage automatique tenant compte de 
la taille de l'écran utilisé : 

static Point Ou = { 0, 0 }; 

+ on appelle le dialogue. La fonction retourne vrai si 
l'utilisateur a ‘cliqué’ sur le bouton OK, et faux pour le 
bouton Annuler : 

GetColor(Ou,“\pCouleur", 
&AncienneCouleur,&NouvelleCouleur) 


‘Palette’ donne aussi un exemple de sauvegarde de paramètres 
dans des ressources : les couleurs des lignes et du fond sont 
mémorisées ; ainsi, on retrouve les couleurs choisies pendant 
la précédente utilisation lorsque l'on relance l'application. 


Bibliographie 


Inside Macintosh volumes 1 à 5 
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LR RRRR HORREUR RER A EE Ke HE ee à / 


f* Palette #7 
/* +/ 
/* vtilisstion du Color Picker package en C */ 


J'ERRRRRRRÉERRRRRRRRRERERRERÉERRERRÉRÉEAÉRRÉRÉRÉEÉÉXÉX / 


#include <QuickDraw.h> FLE. 
#include <MacTypes.h> [o ch 
#include <WindowMgr.h> [+ | | A 
#include <MenuMgrh> = | 
#include <EventMgr.h> 

#inciude DeMeche Cr. 
#include <ToolboxUtilh> 

#include <ColorToolbox.h> 


JR Re ee 4e ee ee Re he ke eee ee 


/* Définition des constantes */ 


JRRRRRRRRÉRRRÉRRRRRRÉRRÉÉERRRÉEAXÉ / 


#define mPomme 128 
#define mFichier 129 
#define mEdition 130 
#define mCouleurs 131 
#define Oui 1 
#define Non 0 


JÉRRRERERRRRRRERÉERERRE / 


/* Variables globales +*/ 


VRREEEEEESELESSESLL SSL SL 


WindowPtr pFenetre; 

WindowkRecord eFenetre; 

MenuHandle hMenus!3]; 

ColorSpec cLignes; 

ColorSpec cFond; 

Rect dragRect = {0, 0, 1024, 1024}; 
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JERRRERKX / 


/* main */ 
REEEELEE 2 


main() 

{ 

TestCouleur(); 
InitGraf(&thePort); 
FlushEvents(everyEvent, D); 
InitWindows{); 
InitMenus(); 

InitCursor); 
MaxAppliZone(); 


if (GetResource( MENU", 128) == 0) 
( 
SysBeep(1); 
return; 


} 


CreeMenus(); 
SaisieCouleurs(); 
OuvreFenetre(); 


while (Boucie()); 
} 


VÉTELELLLLELLLEESSEEEELEELES LS... 7 


/* attente et traitement des événements æf 


VÉLIL ELLE LRE SEE ES ELLES SSL 


int Boucle() 

{ 

EventRecord evenement, 
WindowPtr quelleFenetre; 
Rect F 
SystemTask(); 


if (GetNextEvent(everyEvent, &evenement)) 


{ 


switch(evenement.what) 
{ 
case mouseDown: 
switch(FindWindow 
(evenement. where, &quelleFenctre)) 

{ 

case inDesk: 
SysBeep(10); 

break; 

case inMenuBar: 
return(dansMenu 
(MenuSelect 
(evenement.where))); 

break; 

case inSysWindow. 
SystemClick(&evenement, 
quelleFenctre); 

break; 

case inContent: 
if (quelleFenetre != 
Front Window()) 

SeletWindow 
(quelleFenetre); 
break; 


case inDrag: 
( 
GrafPtr sauvePort; 
GetPort(&sauvePort); 
SetPort(pFenetre); 
DragWindow(quelleFenetre, 
evenement.where, 
&dragRect), 
StPort(sauvePort); 
} 
break; 
default: 
break; 
} 
case keyDown: 
case autoKey: 
{ 
register char c; 
c =evenement. message & 
charCodeMask; 
ifevenement.modifiers & cmdKey) 
1= 0) 
return(dansMenu(MenuKey(c)}); 
} 
break; 
case activateEvt: 
{ 
if (evenement.modifiers & 
activeFiag) 
{ 
Disableltem(hMenus!2!, 0); 
DrawMenuBar(); 


Enableltem(hMenus{2], 0); 
DrawMenuBar(); 
} 
} 
break; 
case updateEvt: 
MiseAJour(); 
break; 
default: ; 
} 
} 
return(l); 


} 


PÉRLEEELELE SES SL SS SSL SELLES 71 


/5 Traitement des menus */ 
JERRREKERR RER ÉE RÉ AK KKX XX / 


int dansMenu(Retour) 


long Retour; 

( 

int Article; 
Str255 nom; 
WindowPeck Pointeur; 


Article = LoWord(Retour); 
switch(HiWord(Retour)) 
{ 
case 128: 
{ 
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RE PES 











Getltem(hMenusf[0], Article, &nom); 
OpenDeskAcc(&nom); 
SetPort(pFenetre); 
} 
break; 
case 129: 
Quitter(); 
break; 
case 130: 
break; 
case 131: 
ChoixCouleurs(Article): 
break; 
default: 
break; 
] 
HiliteMenu(O); 
return(l); 


} 


JRRRARRRRARRRRRRAR TR EEE / 


/* Création des menus ”/ 
JRRRRERRERARRARRARE RE EN / 


CreeMenus({) 

( 

register int index; 

hMenus{0}) = GetMenu(mPomme); 
hMenus[1] = GetMenu(mFichier); 
hMenus{2] = GetMenu(mEdition); 
hMenus{[3] = GetMenu(mCouleurs); 
AddResMenu(hMenus{0}, DRVR'); 
for (index = 0 ; index < 4 ;index++) 
InsertMenu(hMenuslindex], 0); 
DrawMenuBar(); 

} 


JÉRRRRRRRRARRRRARRARRER ER RER ERA RE XX / 


/* Création de la fenétre en fonction */ 
J* de la taille de l'écran *] 


LÉRRERRRRRRRRRRRRRÉARÉREARERRERRRARE RARE / 


OuvreFenetre() 

( 

SetPort((pFenetre = GetNewCWindow(128, &eFenetre, 
-1L))); 

SizeWindow(pFenetre, screenBits.bounds right - 16, 
screenBits.bounds.bottom - 50, Oui); 
ShowWindow(pFenetre); 

} 


JRRRRRRERRARARRARAARARARRÉREAERRRRRRRRRRRER | 


/* Récupération des couleurs sauvegardées ”/ 


/* dans les ressources "‘Clig’ et ‘Cfon' */ 
JRRRRRRERRARARRARAARTRARREREARARAARERRRERAAR / 


SaisieCouleurs{) 

( 

Handle Res; 

Res = GetResource(Clig', 128); 
HLock(Res); 

BlockMove((Ptr)"Res, &cLignes, 6); 
HUnlock(Res); 
ReleaseResource(Res); 

Res = GetResource(Cfon', 128); 
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HLock(Res); 
BlockMove({Ptr)*Res, &cFond, 6); 
HUnlock(Res); 
ReleaseResource(Res); 


} 


JRESRRERRARERRRRRRRE TERRA RS ES US rrrrrk/ 


/* Teste la vrésence d'une carte couleur */ 
/* Si noir et blanc, retour au Finder E/ 


JR RAR RAR RAR RER RRRRRRRÉRRERREAR / 


TestCouleur() 

{ 

SysEnvRec e; 
SysEnvirons(1, &e); 

if (e.hasColorQD == 0) ExitToShell(); 
} 


JRRRRRRRRRRRRRRE EE RRÉRRRRRARER RÉ / 


/* Mise à jour de la fenétre */ 


JERERRRRRARERRERRRRERRRRRRRARE / 


MiseAJour() 
{ 

Rect C 
register int ÿ 


GrafPtr  sauvePort; 


GetPort(&sauvePort); 
SetPort(pFenetre); 
r = (*pFenetre).portRect; 
InvalRect(&r); 
BeginUpdate(pFenetre); 
RGBBackColor(&cFond); 
r = (*pFenetre).portRect; 
EraseRect(&r): 
RGBForeColor(&cLignes); 
i=8; 
while (i <r.bottom) 
( 
MoveTo(Q,i); 
LineTo(rright, i); 
i+= 8; 
} 
i= 16; 
while (i < rright) 
( 
MoveTo(i, 0); 
LineTo(i, r.bottom); 
i+= 16; 
} 
EndUpdate(pFenetre); 
SctPort(sauvePort); 
} 


JRRRRRRRRRRRERRARAARARARRARAARAÉ AE / 


/* Traitement du menu ‘Couleurs */ 
LRRERRRRRRARRRRARARARRARARARÉRRARE / 


int ChoixCouleurs(Aiticle) 
int Article; 
( 
switch(Article) 
( 























case I: /* Couleur des lignes */ /* Sauvegarde couleur du fond *“/ 
{ Handle Res; 
static Point Ou=({(0,0}; Res = GetResource(Cfon', 128); 
if (GetColor(Ou,"\pCouleur des HLock(Res); 
lignes" &cLignes,&cLignes)) BlockMove(&cFond, (Ptr)*Res, 6); 
{ HUniock(Res); 
/* Sauvegarde couleur des liçcnes */ ChangedResource(Res); 
Handle Res: WriteResource(Res); 
Res = GetResource(Clig', 128); InvalRect(&pFenetre->portRect); 
HLock(Res); } 
BiockMove(&cLignes, (Ptr)*Res, 6); } 
HUnlock(Res); break; 
ChangedResource(Res); ) 
WriteResource(Res); return(l); 
InvalRect(&pFenetre->portRect); } 
} J JERRERRRÉRÉEÉRREE / 
break; /* C'est fini */ 
case 2: /* Couleur äu fond */ DESRRSRSRERERER 
{ . 
static Point Ou={(0,0}; Quitter() 
if (GetColor(Ou,"\pCouleur du { . 
fond”, &cFond,&cFond)) vu 
{ 
FRERE RRRRRRRRRRÉRÉRRRÉRRÉRÉRERÉ RE 80000400 8E000200 Type MENU 
. Ressources de la ” 9B000200 95000100 ,129 
* démonstration ‘Palette’ * 9B000100  8E000100 Fichier 
RER RE FERRER 801C0100  403E0200 Quitter/Q 
403E0400  203E0800 
Palette.x.rsrc 101C1000 08002000 Type MENU 
22227772 0600C000  01FF0000 1130 
Type Pttd = STR 003FFF00  GOFFFFCO Edition 
Je O1FFFFEO  O03FFFFFO Annuler/2Z 
Pom's - Programme de O7EFFFES OFFFFFFS8 (- 
démonstration - 10 août 1989 1FFFFFEC 1FFFFFEC Couper/X 
3EFFFFFE  36FFFFFE Copier/C 
Type BNDL 3FFFFFFE 7FFFFFFE Coller/V 
,128(32) 7EFFFFFEC  FFFFFFF8 Effacer 
Pttd 0 FFFFFEUO  FFFFFCO00 
ICN# FFFFFCO0  FFFFFCO0 Type MENU 
0 128 FFFFFCO0  FFEFFFE00 131 
FREF FFFFFEO00  FFFFFFO0 Couleur 
0 128 FFFFFFGO  FFFFFF00 Couleur des lignes. /L 
FFFFFF00  7FFFFE00 Couleur du fond.../F 
Type FREF 7FFFFCO0  3FFFE800 
128(32) 1FFFF000  OFFFE000 * Ressource pour la couleur du 
APPLO 07FFC000  01FF0000 tond 
* Fenêtre 
* Icône de l'application Type Cfon = GNRL 
TypeWIND 128 
| TYPE ICN# = GNRL ,128 H 
| 1128(32) Palette 8481 5CBA 9FFF 
2 428 344504 
003FFF00  00C000C0 invisible NoGoAway * Ressource pour la couleur 
01000020  020E0010 4 des lignes 
04110388 08150448 0 
10110444 100E0444 Type Clig = GNRL 
20000382 20000002 Menus ,128 
2701E002 4D83F002 H 
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L'événement : 
ADN en 
shareware 





Controle X, vous connaissez, 
oh peut être n’étiez vous point 
encore nés... 

C'était il y a un siècle peut-être, 
non plus sérieusement cinq ans, 
soit effectivement un siècle en 
informatique. Cette société avait 
édité alors aux tout débuts du 
Mac un système de gestion de 
bases de données appelé CX 
MacBase. 

Et il advint à Controle X ce qu’il 
est advenu à beaucoup 
d’éditeurs de logiciels : faillite. 


G+M vous connaissez 
récemment encore ils éditaient 
(entre autres) un système de 
gestion de bases de données 
nommé ADN Concept. Point 
commun avec Controle X : 
dépôt de bilan. 

Autre point commun, l’auteur de CX 
MacBase et d'ADN ne font qu'une 
seule et même personne : il s’agit de 
Claude Colin. Deux faillites 
d’éditeurs dans une vie d’auteur cela 
commence à faire lourd. Et d'autre 
part, que faire des acheteurs d’un 
logiciels qui y ont mis, sinon leur 
confiance, tout au moins le souhait de 
voir un produit sérieux et suivi ? 





Pom's n° 43 


Ariel Sebban 


Claude Colin n’est pas un homme 
ordinaire, face à ce nouvel avatar, il a 
décidé de suivre une démarche aussi 
originale que courageuse. Son dernier 
né : ADN, il l’a mis en shareware 
vous allez bien lire : à 300,08 F. 


Oui un programme équivalent à 4D, 
en diffusion libre à un prix 


ridiculement bas. Car il faut vous dire 
qu’'ADN n'est pas un petit utilitaire, 
mais bien un vrai programme 
générateur d'applications au même 
titre qu'Omnis, 4D et autres. 


J'ai voulu comprendre ce qui pouvait 
bien pousser un auteur à faire ce que 
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Hervé ‘Thiriez 


Au cas où vous n'auriez pas compris le titre, il signifie ‘poms ou 
somp ?”. En effet, les hiéroglyphes se lisent, selon le cas, de gauche 
à droite ou de droite à gauche. Et nous avons utilisé pour écrire ce 
titre la police vectorisée téléchargeable AmonFont, développée par 
Cheikh M'Backé et Samory Cancade DIOP, et diffusée par Micro 
Informatique 91 à Orsay (© (1) 64 46 05 85). 


La disquette de démo que nous avons reçue ne nous permet pas de 
connaître, dans le cas de Pom's, le bon sens de lecture du texte. Si 
nous avions eu 4 900,00 F HT à dépenser pour obtenir le produit 
complet avec ses 1 432 signes (soit 3,42 F/signe), nous ne serions 
peut-être pas si ignares. 


De toute façon, si vous devez écrire une lettre d'amour à Cléopâtre, 
et qu'elle vaut bien — comme l'histoire semble l'indiquer — ce 
prix-là, offrez- vous donc la police AmonFont ! 
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certains qualifient de folie, d’autres de 
courage. Je suis donc allé le rencontrer 
pour vous, et voici ce qu’il m’a livré : 


Pom’s : Claude Colin vous avez pris 
une initiative tout àf ait originale à la 
suite de nombreux déboires commer- 
ciaux avec différents éditeurs. 


Claude Colin : C’est vrai, et j'ai 
essayé de réfléchir un peu aux raisons 
de tout ça, et d'en tenir compte en 
mettant au point une nouvelle 
siratégie comvnerciale qui s'adapte à la 
situation et au produit. Et mon 
analyse a été qu'un produit nouveau, 
en tout cas qui cherche à se lancer 
-parce qu'ADN a quand même une 
certaine historique- se heurte 
au jour d'hui à de grandes dificultés. 11 
y a de plus en plus de produits. La 
distribuñ'on a de plus en plus de mal à 
tout prendre en compte. Donc lancer 
un nouveau produit c'est aujourd'hui 
très difficile, et cela demande en tous 
cas beaucoup d'argent. Et qui dit 
beaucoup d'argent dit aussi beaucoup 
de risques, et je crois que c'est pas 
raisonnable, 

Donc il fallait trouver une autre voie. 
Cette autre voie pour moi, cela a été 
de dire finalement, d’une part il faut 
avoir con fiance en son produit, d'autre 
part il faut faire confiance aux 
utilisateurs. Et donc je me suis dit 
qu'au fond, on demandait aux utili- 
sateurs, quand on commercialise 
classiquement un produit, de s'engager 
sur des sommes assez importantes, 
sans vraiment savoir. On leur vend 
quelque chose qui vaut ce qu’on leur 
demande, parce qu'en fait cela 
représente un investissement d'études 
important, mais en fait, on leur 
demande, de prendre tous les risques. 
L'idée était donc, de séparer dans le 
prix d'un produit, ce qui est l'achat 
proprement dit, du service qui doit 
entourer le produit. En se disant que 
finalement, on pouvait proposer un 
produit à un prix que je qualiferais de 
symbolique, de sorte que pratiquement 
tout le monde puisse l'acheter, sans 
craintes el sans risques. 


À partir de là, à partir d'un produit 
acheté à très bas prix, avec tous les 
fichiers de documentation, tous les 
fichiers d'exemples, enfin tout ce qui 
permet de se faire véritablement une 
idée et d'apprendre un produit, ceux 
qui seront intéressés vraiment, et qui 
voudront en faire un usage profes- 
sionnel, ce qui est quand même sa 
vocation, ceux-là pourront, s'ils le 
veulent, passer à une deuxième étape 
qui est celle de travailler avec nous 
dans le cadre de contrats d'abonnement 
de services, de support techniques, ou 
dans des cadres de développement de 
choses plus particulières. 

En résumé puisqu'un produit ne peut 
pas atteindre une large diffusion, sans 
des moyens de lancement très impor- 
tants, il vaut mieux favoriser sa 
diffusion par un prix purement 
symbolique, et après coup créer un 
coopération, une collaboration entre 
les techniciens du produit, et les 
utilisateurs. 


P.: N'y a-r-il pas en France un 
éditeur capable de tenir le coup avec 
ADN ? Et s'iln'yen a pas, n'avez- 
vous pas songé à vous exporter, aux 
U.S À par exemple ? 

C. C.:Si. Il y eu des tentatives 
pour monter un lancement là-bas, 
mais on se heurte aux mêmes 
problèmes : des investissements qui 
sont très importants, plus importants 
aux États-Unis évidemment qu’en 
France, cela se compte en millions de 
dollars. Et miser des sommes 
pareilles, dans un univers très concur- 
rentiel est très risqué. D'autant que 
beaucoup de produits sont annoncés et 
qu’on ne sait pas (trop comment va 
réagir le sien. 

Ma conviction est que ADN devrait 
avoir toutes ses chances, et devrait 
pouvoir l'emporter. Mais, je sais 
aussi, ayant une certaine expérience 
maintenant dans ce métier, que ce 
n'est pas qu'une affaire technique, de 
qualité de produit, de philosophie. Je 
crois qu'il y a bien d'autres choses qui 
interviennent. Et donc pour bien jouer 
un lancement, il faut beaucoup 
d'argent, aux États-Unis encore plus, 
et les financiers ont reculé. Peut-être 
qu'en insistant j'aurais pu frouver une 
solution, mais aurait-ce été vraiment 
une bonne solution ? Est-ce qu’on 


peut lancer des produits comme ça, en 
faisant des paris financiers complets. 
Lorsqu'on lance une affaire, en général 
il y des actifs, quelque chose de plus 
ou moins solide. Là il n'y a qu'une 
idée qui requiert énormément de mises 
de fond de dé part et cela peut être tout 
ou rien. 


P. : Ne vous êtes vous pas teurné 
vers les grands éditeurs, comme 
Microsoft, par exemple. Ne 
pouv&'ent-ils pas être intéressés par un 
bon produit, comme le vôtre ? 


C. C.:Je n'en sais rien. Je ne les ai 
pas consultés. Mais de toutes façons 
j'ai une certaine réticence envers les 
grands éditeurs, parce que je pense 
qu'ils ont beaucoup de produits, et du 
même coup chaque produit n'a pas 
forcément l'intérêt qu'on peut attendre 
pour qu'il soit bien lancé. En plus un 
auteur ne contrôle plus du tout sa 
création. Je suis assez réticent, j'ai 
peut-être tort, mais ce n'est donc pas 
une voie qui me tente. Je me sens 
franchement plus en confiance avec 
une démarche comme celle que j'ai 
adoptée, qui fait appel aux gens pour 
qu le produit est fait, directement. 

Ce produit est fait pour les 
utilisateurs. 1l part de l'idée de ce que 
selon moi devrait être l'informatique 
faite pour eux. Je m'en remet à eux en 
fin de compte. Je leur dit : voilà mon 
produit que vous pouvez avoir pour 
presque rien, regardez et après on en 
reparle. 


P. : Et après trois semaines, pouvez 
vous tirer un prernier bilan ? 

C. C. : Oui un premier bilan très 
partiel, bien entendu, mais ce qui est 
sûr, c'est que je suis aujourd'hui dans 
cette affaire beaucoup plus détendu que 
je ne l'étais il y quinze jours. Parce 
que ce que je constate, ce que 
j'espérais mais qui n'était pas évident 
a priori, c'est que l'idée passe très 
bien. Cette formule plaît énormément. 
Non seulement parce que finan- 
cièrement elle permet beaucoup de 
choses qui n'auraient pas été possibles 
autrement, mais aussi parce qu’elle 
déclenche la sympathie, autour du 
produit. C'est quelque chose qui est à 
noter : très souvent lorsque des gens 
achètent le produit, il y des 
commentaires, du type ‘bravo pour 





Pom’s n° 43 





votre initiative, c'est formidable, on 
va vous aider, je contacte (ous Ceux 
qui on un Mac pour leur en parler 
etc. Il se passe réellement quelque 
chose, qui n'est pas très classique, 
dans les réactions des gens. Ça 
m'encourage beaucoup. À laisser un 
produit comme ça librement copiable, 
avec toute sa documentation, on aurait 
pu s'attendre à ce que les gens ne 
jouent pas le jeu. Or je m'aperçois 
qu'il le jouent. On m'a beaucoup dit, 
avant de lancer cette initiative qu'en 
France les gens ne jouent pas le jeu. 
En fait c'est peut-être vrai, mais 
ADN, avec cette initiative, les choses 
se passent différemment. 


Les gens prennent conscience qu' ADN 
c'est pas un jeu, c'est pas un 
accessoire de bureau, c'est quand 
même un très gros produit. Ça crée un 
type de rapports et de réactions 
complètement différents. Et là je sens 
vraiment que le courant passe. 
Évidemment après quinze jours, on ne 
peut pas dire qu'ADN est au sommet 
de sa diffusion, mais il n'y a pas de 
doute pour moi que ça a pris un départ 
sur les chapeaux de roues, surtout si 
on tient compte de la faible 
information, à ce jour. Malgré cela 
tous les jours neus recevons un 
certain nombre de corvnandes des uti- 
lisateurs que j'appelle de la deuxième 
génération, ceux qui ont acheté parce 
que quelqu'un a acheté, ce qui après 
quinze jours est très rapide comme 
retombées. 

Il faut néanmoins noter, que la plupart 
des gens qui achètent à ce jour, 
achètent à son prix le plus bas. 
C'est-à-dire, que les contrats d'abon- 
nement sont pour l'instant moins 
nombreux. Mais il y en a. Surtout, il 
paraît normal que les gens commen- 
cent par tester le produit avant de se 
lancer dans une collaboration plus 
importante, qui au total n'est pas si 
coûteuse que ça, puisque tous les prix 
de services associés, sont nettement en 
dessous de ceux de ses concurrents. 
Donc sans crier victoire trop vite, je 
crois que ce n'est pas mal parti. 


P.: Est-ce que vous pensez que tout 
cela est réellement viable ? Même si 
la synergie existe, même si le nombre 
d'achats croît, il ne faut pas se cacher 
que pour avoir le même rapport 








Où tu CRECH? 
En HyperFac ! 


La Faculté des Sciences Éco- | 
nomiques de Montpellier vient 
de créer un centre de recherche | 
| original, le CRECH (Centre 
de Recherche Européen et | 
Création Hypermédias), sous | 
la direction d'Alain Dumas, et 
animé par Daniel Garric, jour- 
naliste scientifique au Point 
(rubrique Futurs) et un des plus | 
ardents prosélytes en France de | 
lhypertexte, et d’ailleurs de 
l'innovation sous toutes ses 
formes. 








| Daniel Garric a toujours su lier 
| leplaisiretletravail; ilestdonc 
naturel qu’il se soit intéressé à 
l’hypertexte, qui en réalise très 
bien ia fusion. C’estd’ailleurs à | 
ui que lonwdoithie lrérrme 
“’gadjouet” qui marie en un mot | 
les notions d'innovation et de 
plaisir... 


Ce premier centre derecherche 
sur l’hypertexte en France | 
délivrera un diplôme del 
troisième cycle, un mastère, la 
premièrepromotionrentranten 
octobre 89, dans lequel les | 
| travaux en liaison avec des | 
entreprises joueront un rôle | 
important. 





C’est de l’enseignement à 
Paméricaine — pragmatique — 
hélas trop rare en France. | 
Souhaitons le plus vif succès à 
cette entreprise originale et 
| dynamique | 
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financier, il en faut vendre quinze fois 
plus de logiciels que par le passé. 

C. C.: Vous avez partiellement 
raison. Si on ne vendait que du 
shareware, l'écart est effectivement de 
un à quinze. En fait ü est un peu 
moins que cela, parce que la façon 
dont nous vendons ADN est moins 
coûteuse. Il n'y a pas d'action 
commerciale sur tout le territoire, les 
charges sont nettement moindres, et 
sont concentrées essentiellement sur 
l'aspect technique et le soutien des 
utilisateurs. Donc si le prix est quinze 
fois inférieur à ce qu'il était, il suffit 
que le nombre de programmes vendus 
soit seulement dix fois supérieur, pour 
un même chiffre d'affaires, à condition 
toujours de ne considérer que les 
shareware. 

Îl y a aussi un pourcentage que je ne 
peux pas encore évaluer d'abon- 
nements, qui va modifier ce rapport. 
Nous allons aussi lancer, dès 
septembre un certain nombre d'appli- 
cations, et de compléments d'ADN qui 
vont être proposés à des prix très bas, 
et qui augmenteront de toutes façons, 
le chiffre d'affaires d'Initiative ADN. 
Et il faut voir qu'on va être une 
société de soutien du produit, avec des 
développements spécifiques, et c'est de 
cet ensemble dont il faut tenir compte, 
en terme de chiffre d'affaires à réaliser, 
pour obtenir le même niveau de 
résultats. 

Je ne crie pas victoire trop vite, sur le 
plan économique, mais je n'aï pas le 
sentiment que ce que je fais soit 
incohérent, loin de là. C’est quand 
même calculé, avec une marge 
d'incertitude forcément importante, 
mais c’est loin d'être absurde. Et je 
crois en plus que ça entre dans un 
mouvement plus général. Aujour- 
d'hui, les utilisateurs notamment 
professionnels, sont bien plus pré- 
occupés par le service que par le 
produit. Et ils ont raison. Les produits 
sur le marché actuellement sont dans 
l'ensemble bons. La différence se fait 
surtout par la qualité du service. Je 
veux donc insister la-dessus car c'est 
très important. Îl y a deux originalités 
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dans notre démarche : il y a un choix 
économique, on ne vend plus de la 
même façon. On casse les prix des 
produits pas des services, qui eux sont 
vendus à leur juste prix. C'est un 
choix commercial. 


Par ailleurs ADN en lui-même, et cela 
n'a pas été assez dit au début de 
l'exploitation de ce produit, est un 
produit qui se veut différent des autres, 
pour des raisons très fondamentales, 
peut-être pas visibles en quelques 
minutes sur l'écran. Ces différences 
tiennent à une volonté beaucoup plus 
grande, à mon avis, de coller à la 
façon de raisonner des utilisateurs, et 
de suivre leur démarche. 

Dans ADN on ne demande pas aux 
utilisateurs qui développent leurs 
applications de trop penser à l'avance 
à ce qu'ils vont faire, du moins de 
façon moins insistance que dans 
l'informatique traditionnelle. En ce 
sens, plus ils vont avancer dans leurs 
applications, plus ils vont avoir des 
nouvelles idées, quelquefois ils vont 
revenir en arrière, tout cela dans ADN 
est vraiment f acilité. 


Je crois que les utilisateurs le 
ressentent quand ils l'utilisent, mais 
ils ne peuvent pas le ressentir au 
moment de l'achat, ils n'en savent 
rien à ce stade. C'est pour ça qu'il est 
important pour moi de favoriser une 
grande diffusion, qui permettent aux 
gens d'aller suffisamment dans le 
produit pour ressentir ça. Après je 
dirais que c'est gagné, car ils savent 
que c'est en fait ce qu'il leur faut. 


P.: Si nous parlions justement 
d'ADN, un peu plus, en tant que 
produit. 

C. C. : On dit à juste titre que c'est 
une base de données et générateur 
d'applications. Mais compte tenu de 
son concept de base, c'est forcément 
plus que ça. Je veux dire par là, que 
l'idée de départ d'ADN, c’est de dire 
qu'on est habitué à raisonner sur des 
documents papier, sous forme 
diverses, des fiches, des lettres, toutes 
sortes de choses, avec des images, des 
graphiques, des tableaux etc. 


Quand on passe sur ordinateur, on 
commence à fausser ce jeu, même sur 
Macintosh. Le jeu est faussé parce 
que, on commence à introduire 
d'autres concepts, que tout le monde 
manipule sans le savoir, mais qui sont 
cachés dans nos raisonnements 
habituels, qui sont par exemple, les 
concepts de fichu'ers, bases de données, 
liens entre fichiers, calculs, etc. Pour 
l'utilisateur novice il y a d'une part 
l'intervention de concepts nouveaux, 
et d'autre part il y a une séparation des 
tâches, liée à des raisons techniques. 


On sépare base de données, tableurs, 
traitements de textes et autres. Ce 
n'est pas parce qu'on pense di fférem- 
ment, mais pour des raisons techni- 
ques, il est plus facile de mettre d'un 
côté les problèmes de bases de 
données, et de l'autre les problèmes de 
tableurs, traitements de textes... 
L'idée d'ADN, qui est une idée 
directrice, c'est de dire : tout cela n'est 
pas normal. C'était normal dans une 
certaine phase de l'histoire de la 
micro-informatique, mais ce n'est plus 
normal. Et donc en repartant de l'idée 
de document, ADN essaie d'avancer 
dans une direction qui n'est pas trop 
faussée, par ces idées que j'évoquais. 
ADN permet donc de réaliser des 
documents à l'écran comme on le fait 
sur papier. Bon ça on le fait dans plein 
de programmes, mais toujours en 
oubliant au passage tout un tas de 
choses. 


Si on écrit un document dans un 
traitement de textes, on perd l'idée que 
ça peut être un fichier, où un 
document de calculs. Ce raisonnement 
étant valable pour les tableurs, bases 
de données etc. ADN essaie de 
repousser le plus tard possible, ces 
choix inévitables en l’état actuel de la 
technique. C'est donc un programme 
qui est construit autour d’une base de 
données, puisque c'est le cœur même 
de ce que doit être un produit. C'est le 
problème le plus dur à résoudre, Mais 
les documents ADN ne sont pas que 
des masques et des fiches. Ce sont 
aussi des documents que l'on dessine 
bien, qui peuvent prendre l'aspect de 
lettres, bien que ce ne soit pas 
vraiment un traitement de textes, ni 
un programme de PAO, maïs ça en a 
certains aspects. Ce n’est pas non plus 





un tableur, mais on peut très bien, 
avoir de documents avec des calculs 
importants, et certains utilisateurs 
font des fichiers de tableurs en f ait. 

Ce que je me suis dit c'est que ces 
documents dessinés à l'écran, aussi 
proches de ce que l'on aurait fait sur 
papier, on va découvrir petit à petit 
qu'on peut faire avec, certaines choses, 
qui rentrent dans un cadre naturel. À 
savoir dans un document fichier, 
pouvoir extraire des informations, etc. 
Tout cela vient naturellement. Dans 
cette philosophie, j'ai été amené à 
mettre dans ADN, énormément de 
fonctionnalités. Pour que le produit ne 
devienne pas trop complexe, s'est 
posé le problème d'une stratifcation 
du programme. ADN peut donc se 
voir à plusieurs niveaux. Il y a le 
niveau de l'utilisateur relativement 
débutant, qui ne veut pas aller très 
loin, mais qui trouve toujours 
beaucoup de choses. Il y a le niveau 
inférieur de l'utilisateur qui utilise une 
application sans savoir comment elle 
est faite. Et puis il y a les niveaux de 
développeurs, depuis celui qui s’est 
enhardi à l’utilisation, jusqu'au 
développeur qui va très loin travaillant 
sur d'autres produits, ou parfois même 
dans un langage de base. 

Tout cela est donc organisé de façon 
que chacun à son niveau ne soit pas 
gêné par les possibilités des autres 
niveaux. Autre idée directrice : le fait 
que chaque idée nouvelle puisse être 
ajoutée sans infliger tout un tas de 
reconfRigurations, de difficultés et 
d'inconvénients de tous ordres. 


Pour ce faire outre la notion de 
document, j'ai introduit, depuis 
longtemps déjà, la notion de 
programmation objet, au niveau des 
objets utilisateurs, C'est-à-dire docu- 
ments et fichiers, champs ou 
rubriques, les éléments actifs tels que 
boutons, contrôles, auquel on peut 
affecter un programme, qui s'exécute 
quand on utilise l'élément. S'il s'agit 
d'un bouton, le programme s'exécute 
quand on clique dessus, de même pour 
une rubrique, quand on entre en saisie, 
ou quand on en sort, le programme 
s'exécute. Tout ça fait un ensemble, 
d'abord plus naturel, parce qu’il est 
possible de commencer sans program- 
mation, et petit à petit on vient greffer 
des programmes dessus. 
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Qui joue 
avec le feu ? 


Récemment des journalistes ont 
reçu des disquettes contenant des 
sources de la ROM du Macintosh. 


Une mystérieuse organisation 
baptisée Nu-Prometheus re- 
vendiquaitlapaternitédecetacte. 
Selon ses auteurs (inconnus) le 
but de la manœuvre S%rait de 
répandrela ‘bonneparole’Macin- 
tosh,afin depermettre à des fabri- 
cants, de construire des compa- 
tibles Mac. On peut se demander 
l'intérêt réel de la manœuvre, sa- 
chant que de toutes façons, les 
ROM avec ou sans sources sont 
protégées par des copyrights, et 
Apple n'a pas l'habitude de faire 
däns la dentelle quand il s’agit de 
se défendre sur la question. 





Par contre, ceux qui ont reçu ces 
sources et en particulier Color 
QuickDraw, n'ont pu que 
s'extasier devant la limpidité de 
ces programmes. La réaction la 
plus courante a été de penser que 
seuls des cerveaux géniaux 
avaient pu pondre de tels codes. 
Mais on le savait déjà. 


Chez Apple, on pense que des 
anciens salariés sont à l’origine de 
cet acte de piraterie. Jean-Louis 
Gassée furieux a saisi le FBI. 
Réaction en privée d'un respon- 
sable Apple France: «Etalorsavec 
TMON et un peu de temps 
n'importe qui peut en faire 
autant » Bof ! Affaire à suivre. 











À chaque nouveau programme 
correspond en fait une nouvelle idée. 
Par exemple, j'ai l'habitude de faire 
ceci, je vais mettre un choix de menu 
correspondant avec un programme 
associé qui le fait pour moi. Dans une 
rubrique, si j'ai toujours la même 
vérification à faire, je vais écrire un 
programme qui le fait systéma- 
tiquement. C'est comme cela qu'un 
débutant programme. L'avantage de ce 
type de programmation est d'être très 
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progressive, et de savoir exactement 
où sont les choses. Si vous avez à 
revenir sur une application, même 
longtemps après l'avoir écrite, ou 
même sivous n'en n'êtes pas l’auteur, 
vous savez où se trouve chaque 
programme. Plusieurs personnes 
peuvent ainsi participer à la cons- 
truction de la même application. Alors 
tout ceci débouche, sur le plan plus 
technique, sur un produit qui peut 
gérer des fichiers, lesquels n'ont pas de 
limites particulières d'utilisation. 


Chaque document peut s'étaler sur des 
pages (jusqu'à trente), ils peuvent ou 
non jouer un rôle de fichier. Les 
champs portent des noms qui 
permettent de les désigner dans des 
relations de tout ordre. Il n'y a pas de 
liens organiques, c'est-à-dire qu'une 
base, au sens habituel du terme, n'est 
pas indissociable, il n'y a pas d'index 
croisés. Lorsque d'un fichier vous 
voulez appeler une fiche d'un autre 
fichier, c'est une instruction de pro- 
grammalion qui exprime ce lien, et 
qui fait que par le biais des index, la 
fiche est retrouvée, 


Une application ADN est un groupe 
de fichiers ou de documents, et vous 
pouvez avoir des fichiers ou 
documents qui appartiennent à 
plusieurs applications, ou encore 
ajouter des fichiers à une application 
existante, et même fusionner deux 
applications jusque là utilisées sépa- 
rément. Tout cela sont des choses 
assez inhabituelles dans une base de 
données. 


Les fichiers, sont de deux sortes : les 
fichiers monopostes, qui sont gérés 
par la version diffusée en shareware. I! 
y a aussi une version dite multi-poste, 
orientée vers les très gros fichiers, et 
multi-postes AppleShare, qui permet 
de gérer sous AppleShare, des 
applications multi-utilisateurs, grâce à 
un séquentiel indexé partageable. Les 
fiches sont gérées en longueur 
variable, les champs vides n'occupant 
pas de place, grâce à ce que j'appelle 
une structure de sac, c'est-à-dire que 
les informations sont mises en vrac, 
avec des indicateurs qui disent de 
quelles informations il s'agit. Du 
point de vue de l'aspect des 
documents, il y a des possibilités de 
champs, zones images, fixes ou 
variables, des zones listes qui sont des 





tableaux à l'intérieur d'un document, 
et enfin une particularité d'ADN, qui 
est ce que j'appelle les pictogrammes 
d'ADN. 


Ces pictogrammes sont des procé- 
dures externes qui contrairement aux 
procédures externes classiques, qui 
existent aussi dans ADN, sont des 
procédures qui se greffent au 
programme principal, en différent 
endroits, comme des prises multi- 
broches. Un piciogramme c'est une 
zone que vous définissez sur votre 
document, et cette zone qui est une 
image, est dépendante de dennées dans 
les fiches. C’est en quelque sorte une 
zone image calculée. Cette zone est 
définie en modélisation. Il faut dire à 
ce stade en quoi elle dépend d'autres 
zones, Ce qui se fait sans 
programmation, par des clic souris. À 
partir de là la zone va prendre l'aspect 
dé fini par le pictogramme, par les 
valeurs des champs dont elle dépend. 
Parallèlement, selon le pictogramme, 
elle peut renvoyer des données dans 
d'autres champs, réagir à des clic. 


En fait un pictogramme est un 
véritable programme indépendant du 
programme principal, qui peut se 
mettre n'importe où, dans n'importe 
quel fichier ou document, avec 
n'importe quel type de liaisons. 

Par ce biais les premiers picto- 
grammes qui existent et qui sont 
diffusés dans ADN, sont des 
pictogrammes graphiques, qui permet- 
tent des créer des graphiques couleurs à 
partir de données numériques. La 
programmation, qui est donc une 
programmation objet, se fait par un 
langage qui comporte environ 150 
instructions de base. Par le biais 
d'options, on peut estimer à 500 le 
nombre de fonctionnalités program- 
mables. Ce langage part de mots 
relativement transparents, avec une 
syntaxe assistée par l'éditeur, le tout 
pouvant être entré par la souris. Cette 
programmation permet donc de gérer 
quasiment tout depuis l'interface 
jusqu'aux entrées/sorties. 

On peut aussi ajouter des procédures 
externes pour ses propres besoins. Le 





























dernier as pect important d'ADN est la 
facon dont est traitée la documen- 
tation. Il y a tout d'abord l'aide 
intégrée, qui va sensiblement plus 
loin que ce qui se fait dans les autres 
produits. Il y a des fichiers ADN, qui 
permettent par un clic de souris 
d'avoir un écran d'information qui 
apparaît sur n'importe quel partie à 
renseigner, depuis les articles de 
menus jusqu'aux termes de langage. 
Cet écran, peut faire plusieurs pages. 
Donc une aide très complète. D'autre 
part il y a des fichiers de leçons, faits 
avec ADN, qui sont de véritables 
cours progresäfs. Troisième système 
d'aide : les exemples de programmes 
(500) qui permettent par un simple 
copier/coller d'aller plus loin dans sa 
programmation. Ce système de 
documentation est intéressant pour 
ceux qui développent des applications, 
puisqu'il est possible de créer son 
propre système d'aide et ses propres 
leçons sur ses applications. Toute 
application qui sera fournie, pourra 
être documentée sous cette forme. De 
plus la documentation devient faci- 
lement évolutive. 


P. : Le produit lui-même, 
continuez à l'améliorer ? 


vous 


C. C. : Oui c’est très important. 
Dans les abonnements supports 
techniques, nous prévoyons deux 
remises à jour par an. Ces remises à 
jour viennent de plusieurs sources. Il 
y a d'abordune source de fonds : ADN 
est un choix d'une certaine 
informatique. On peut aller très loin 
avec, mais il y a encore des progrès à 
faire. Moi j'ai envie d'a jouter plein de 
choses. Et puis il y a les réactions des 
utilisateurs. ADN est un produit qui 
mâche la programmation, et du même 
coup, il propose des instructions qui 
sont souvent des macros, et si un uti- 
lisateur trouve qu'il manque des 
choses, nous les notons, et nous les 
ajoutons. En général, cela ne pose pas 
de problèmes. Le produit évolue aussi 
à cause du Mac, il faut rester à la 
pointe du progrès, donc cela fait 
beaucoup de causes d'évolutions. 


Il y a aussi une diversification des 
versions d'ADN, suivant les besoins. 
Tout le monde ne gère pas d'énormes 
fichiers, ou des communications avec 
des sites centraux, il ÿ aura donc des 
versions spécialisées. C'est tout un 
ensemble qui dépendra de l'intérêt qui 
sera porté à ADN. Mais aujourd’ hui je 
suis assez rassuré sur ce point. 


C. Colin a délibérément adopté une 
démarche que l’on ne peut que saluer. 
Il È s’en remet totalement aux 
utilisateurs, pour promouvoir son 
programme. Il nous fait confiance. 
Dans le microcosme informatique 
français où subsiste la paranoïa du 
piratage, cette attitude est remarquable. 
D'autre part il faut bien voir qu’ADN, 
est un vrai gros programme générateur 
d'applications, comme on en voit plus 
souvent à 6080,80 F qu’à 300,00 F. 
Le programme en lui même est noté 
cinq Pom’s sans réserves. Fichiers 
liés, documents personnalisés, recher- 
ches multi-critères, états de tous 
types, tout y est avec une interface 
plus que correcte. De la petite factu- 
ration, aux Connexions gros systèmes 
en passant par les gestions de 
prospects et tout ce qui fait la vie 
d’une entreprise, ADN permet de tout 
gérer. Même si vous vous contentez 
de gérer vos cassettes vidéo, à ce prix 
c’est plus qu’une aubaine. La qualité 
de son interface, ne se fait pas au 
détriment de La puissance. 

S'il fallait à tout prix étiqueter ADN, 
on pourrait le positionner entre un 
SGBD et HyperCard. SGBD pour ce 
qui est de la gestion proprement dite 
des données, à savoir une viaie gestion 
de base avec index, états de sortie 
paramétrables, et HyperCard, pour sa 
programmation objet. 

Vous qui hésitiez à acheter un 
gestionnaire de bases de données, 
devant la multiplicité de possibilités, 
et surtout devant les prix demandés, 
ADN doit enlever votre décision. 
Simplement jouez le jeu, il le faut, 
c'est la règle. Il est certain que si 
l’expérience se révèle positive, elle ne 
pourra que faire des émules. La vision 
qu’a Claude Colin, de l’informatique 
sur Mac, rejoint certainement celle de 
Bill Atkinson, et finalement n’est pas 
grâce à des ‘allumés’ comme eux que 
le Mac est ce qu’il est ? 


Les autres news. 


Je vous ai annoncé il y deux ou trois 
numéros, l’annonce de SuperCard, 
en souhaitant que ce produit ne joue 
pas les Wingz. Silicou Beach 
Software a tenu ses promesses, et 
c’est très gentiment qu'il y a deux 
semaines, les gens de MacSell m'ont 
prêté le produit pour vous en parier. 
Bon, pour ceux qui ne le sauraient pas 
encore, SuperCard est un programme 
qui se voudrait le successeur 
d'HyperCard. Même philosophie, 
même type de langage, et relecture des 
piles HyperCard, pour en faire des 
documents SupeiCard. Sur le plan des 
améliorations par rapport à son 
auguste initiateur, SuperCard apporte 
une énorme amélioration, pour ce qui 
est des fenêtres. Désormais les piles 
peuvent utiliser des vraies fenêtres, 
redimensionnables, et il est même 
possible de créer des fenêtres du type 
palette. 


La gestion des objets y est aussi plus 
développée puisque même un bout de 
dessin peut devenir un objet, 
SuperCard permettant de travailler à la 
MacDraw. Désonnais lout et n’im- 
porte quoi peut devenir un objet et 
donc être géré par des scripts associés. 
Pour finir sur le plan des différences 
fondamentales, SuperCard gère la 
couleur, et permet de créer des 
applications autonomes, double cli- 
cables et dont on peut personnaliser 
l'icône. 

D’autres améliorations ont été appor- 
tées dans l'ergonomie de la création 
d’une pile, en particulier l'éditeur de 
scripts permet l’incorporation des 
mots-clefs sans frappe, par sélection 
dans des menus pop-up. 

Tout serait-il parfait ? Pour ma part je 
pense que si SuperCard apporte une 
réelle amélioration par rapport à 
HyperCard, c’est au prix d’une 
manipulation beaucoup plus lourde. I 
m'a fallu avec HyperCard un petit 
quart d’heure pour savoir créer des 
cartes simples avec champs et 
boutons. Deux heures supplémentaires 
m'ont suffit pour créer des scripts, 
sans prétention, mais qui fonction- 
naient. Avec SuperCard, la lourdeur de 
mise en œuvre ne pernet pas d’aller 
aussi vite, et quand on passe de l’un à 
l’autre quasiment tout est à 
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réapprendre. 

Tout d’abord, le programme lui même 
est composé de deux sous- 
programmes, l’un pour fabriquer la 
base, dénommé projet dans SuperCard, 
l’autre pour faire tourner le projet. La 
puissance a engendré la lourdeur, ce 
qui est un peu en contradiction avec la 
philosophie du Mac. D'autre part la 
documentation fournie est dans le 





| Le FDHD (Floppy Disk High Density) est un lecteur 

| capable de stocker 1,4 Mo sur les disquettes 3,5" au 

| lieu de 800Ko avec les anciens lecteurs. 

| Les disquettes Mac 400 et 800Ko restent bien en- 
tendu utilisables. Apple File Exchange sait utiliser le 
FDHD pour lire les disquettes MS-DOS, OS/2 et 


ProDOS. 


Fidèle à sa politique, Apple propose aux 
possesseurs de Mac SE un kit de mise à niveau. 





genre léger. Une refonte du manuel 
serait en préparation devant le 
récriminations des utilisateurs outre- 
Atlantique. HyperCard, comporte 
d'emblée un système de documen- 
tation intégré qui est loin d’être égalé 
dans SuperCard. HyperCard possède 
une facilité d’utilisation que beaucoup 
peuvent lui envier, et il sera difficile, 
ne serait-ce par le mode de diffusion, à 
SuperCard de devenir un standard. 


Le nouveau 4D 
est arrivé... 


Avec seulement (!) six mois de retard, 
le nouveau 4D est arrivé. Un seul mot 
pour le qualifier : époustouflant. Je lui 
consacrerais un plein article très 


Macintosh SE SuperDrive 


Les Macintosh SE dotés de deux lecteurs de dis- 
quettes comme ceux équipés de disques durs 20 ou 
40Mo sont maintenant livrés par Apple équipés en 
| Standard des nouveaux FDHD SuperDrive. Et ce 
| sans changement de prix. 


prochainement, car il est difficile de 
résumer en quelques lignes toutes les 
améliorations que Laurent Ribardière y 
a apporté. Sachez simplement que de 
tortue, 4D v4 est devenu formule 1, 
et d'éléphant, il est devenu gazelle. Je 
veux dire que ce programme est 
désormais rapide et d'une facilité d’uti- 
lisation aérienne. Mais je n’en dit pas 
plus pour cette fois. 





Et dernière minute : une nouvelle 
version pour FoxBase : la version 
2.0. 


Rappelons que FoxBase est un SGBD 
qui a cet avantage de pouvoir récupérer 
fichiers et surtout programmes DBase 
III sur PC. Qui a encore dit beurk s’il 
vous plaît, j'en ai vu un au fond de la 
classe. Non Monsieur, nous ne 
sommes plus sectaires sur Mac, c’est 
terminé. Bref, en résumé voici les 
améliorations apportées par rapport à 
la version 1.1. Un interfaçage 
HyperCard, par le biais de XCMD et 
XCFN, rapidité accrue. 


Soit dit en passant, FoxBase n'était 
déjà pas du genre lent. Si c’est vrai 
que celte version est trois fois plus 
rapide, bonjour les excès de vitesse, 











De plus un éditeur d'état à la hauteur 
du Mac, à savoir Wisiwig et tout, et 
un générateur d’étiquettes, plus per- 
formant. Pour clore un tas de 
nouvelles fonctions. Chiche on va 
tâcher de le mettre en face du nouveau 
4D, du nouvel Omnis, d'ADN, et on 
va voir après torture ce qui va en 
sortir. Je vous tiens au courant. J’ai 
bien ma petite idée, mais ce n’est pour 
l’instant qu'une intuition. En 
attendant, FoxBase est distribué par 
AB Soft. 


Voilà pour les grosses nouveautés de 
ce numéro. 

Mais continuons la rubrique ‘les 
petites choses qui simplifent la vie’. 


Le spooler 
d’imprimante 
SuperLaserSpool 


Un spooler d'impression est un 
programme qui permet d'accélérer 
considérablement les tâches d’im- 
pression. Pour mémoire, il faut savoir 
que le Macintosh imprime, dès que 
l'on fait appel à une impression non 
brouillon, en mode image. C'est-à-dire 
que l'imprimante travaille en mode 
graphique au lieu d'utiliser les 
caractères résidants. Ce qui permet 
d'imprimer indifféremment textes et 
dessins sans changer de configuration. 
Cependant, ce type d’impression est 
très long. Et durant tout le processus, 
le Mac est immobilisé. Les 
programmeurs ont repris l’idée du 
temps partagé qui existe Sur gros 
systèmes depuis longtemps. 


Au lieu d’envoyer le fichier 
directement sur l’imprimante, on crée 
un fichier temporaire sur le disque, qui 
est une image de ce fichier. Dès lors 
quand le Mac ne fait rien (contrai- 
rement aux apparences c'est très 
courant, même quand vous ramez 
comme un fou dessus), il occupe ce 
temps libre à imprimer. C'est ce 
qu’on appelle une tâche de fond. 

SuperLaserSpoel permet donc 
d'imprimer pendant que vous êtes 
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occupés à autre chose. Ce programme 
est constitué d’un INIT et d’un 
accessoire de bureau. L’INIT est le 
spooler proprement dit, tandis que le 
DA se comporte comme un utilitaire 
associé. En effet, le fait que le spooler 
rende la main très rapidement, permet 
d'imprimer successivement plusieurs 
documents qui seront mis dans un 
dossier sur disque, réservé à cet effet. 
Dès lors ils constituent une fite 
d'impression, dont il est possible de 
modifier l'ordre grâce au DA. Ce 
même DA permet aussi de désactiver 
ou de suspendre une impression. Si 
par malheur, une bombe survenait 
pendant une impression, le travail 
n’est pas perdu, puisque qu'au re- 
démarrage, l'INIT est capable de savoir 
si une impression a été interrompue, 
etdonc de reprendre la tâche. 


Distribué par Symbiotic. 
Les plus de ce mois. 


Je vous ai trouvé encore quelques 
gâteries pour votre Macintosh. 


Tout d’abord deux nouvelles versions. 
L'une de Superelock : le must en 
matière d'horloge en barre de menus. 
Pour mémoire, cet utilitaire, sous 
forme d’un CDEV, outre le fait de 
donner l'heure en permanence, donne 
aussi la date, et aussi fait chrono- 
mètre. Cette nouvelle version caril- 
lonne en plus toutes les heures, le son 
que vous voulez, et éventuellement le 
nombre d'heures concernées. En share- 
Ware. 


Autre nouvelle version : Boomerang 
dans sa version 2.0b7. S'il ne restait 
qu'un utilitaire, ce serait celui là ! Ce 
CDEV permet d'améliorer les 
dialogues d'ouverture et de sauvegarde 
de fichiers, de manière tout sim- 
plement phénoménale. 


Désormais il autorise la création d’un 
nouveau dossier sans repasser par le 
finder, et possède une fonction 
“rebond”, qui permet de retrouver 
instantanément le dernier fichier et/ou 
dossier utilisé. De plus une option de 


recherche de fichiers remplace 
avantageusement celle du système en 
accessoire de bureau. En freeware. 


Pour les férus d'amélioration d’inter- 
face, une petite INIT, qui permet de 
modifier l'aspect des boutons 
standards, boutons radios et boîtes à 
cocher. Purement esthétique. 

Et pour les stackeurs invétérés, une 
pile de XCMD'Ss, qui vous permettra 
de créer des dialogues personnalisés 
sous toutes formes possibles et 
imaginables regroupées en sept ca- 
tégories. Tout est permis, du dialogue 
simple avec texte à entrer et boutons, 
aux dialogues complexes tels que les 
dialogues d’aide en ligne avec images 
incorporées et renvoi sur des mots 
clefs. En shareware. 


Nous ne le répéterons jamais assez, le 
shareware est un programme en 
diffusion libre, mais d'utilisation 
payante. Alors payez vos shareware, 
cela ne peut qu’encourager les bonnes 
volontés. 


J'ai reçu récemment une question 
émanant d’un de nos fidèle lecteurs, 
Mr Bensimon : en substance la 
question était quel langage choisir 
pour développer des XCFN et autres 
XCMD pour HyperCard, assembleur, 
Turbo-Pascal, C ? 


Le choix d’un langage de dévelop- 
pement dépend essentiellement du 
temps que l’on veut consacrer à 
l'apprentissage dudit langage. Je ne 
pense pas que tel ou tel langage soit 
plus valable l’un que l’autre, mais 
simplement doit répondre à un besoin 
donné, en fonction d’un résultat désiré. 
Ceci dit il est évident que si connais- 
sant parfaitement un assembleur, en 
l'occurrence le 6502, vous aurez une 
tendance naturelle à pouvoir travailler 
sur le 68000 dans le texte si Jose dire. 
Mais bon courage tout de même car le 
68000 est un très gros morceau. 
L'outil de développement idéal pour 
l'assembleur est le MPW (ou 
Macintosh Programmer Workshop) 
qui possède un des meilleurs 
assembleurs tous ordinateurs confon- 
dus, avec des oùtils de debugging hors 
du commun. MPW possède toute les 
interfaces nécessaires pour HyperCard. 


Le Turbo-Pascal possède lui un 





avantage de taille sur les autres Pascal, 
c’est sa simplicité de mise en œuvre. 
Certes il n’est pas l'outil idéal pour 
écrire un programme comme 4D, mais 
il suffit largement pour écrire très 
rapidement des XCFN et autres 
XCMD. Et surtout présente le 
meilleur rapport qualité/prix, pour ce 
qui est du coût de développement. 
Pour ce qui est du C, je vais vous 
proposer une solution plus originale 
et surtout plus économe de temps, en 
évitant d'apprendre ce langage. Il 
s’agit de VIP. Il est possible d'écrire 
une fonction externe pour HC et 
d’ailleurs pour n’importe quel pro- 
gramme acceptant des externals en C, 
sans connaître le moindre mot de C ! 
Pour ce faire il suffit d'écrire Je dirais 
dessiner en VIP le langage développé 
par Mainstay. VIP permet grâce à 
des translateurs de sortir un source 
compilable en LightSpecd C. 
Résultat, des temps d'apprentissage et 
de développement divisé par 10 à 50. 
Contrepartie : coût global plus élevé, 
puisque nécessite VIP + translateur + 
LightSpeed C. 


À larenwée ! 
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Nouvelles du front 


” Le trust Beagle ? 


Je l'ai déjà dit souvent : la fidélité de ce 
brave vieux chien mérite récompense. 
Beagle Bros et l'Apple //, c'est le 
chasseur et son chien. Pour que la fidélité 
paye, il faut du temps. Mais tout indique 
que, pour Beagle Bros, ce temps est 
arrivé. 

Depuis le rachat de StyleWare par Ciaris 
pour développer AppleWorks GS, les 
autres produits Apple // de Styleware 
{Multiscribe, etc.) étaient “dans les 
choux”. Beagle tes a rachetés à Ciaris, et 
va en assurer la diffusion et le support. 
Vous connaissez sans doute aussi 
Pinpoint Publishing. Pinpoint avait 
démarré avec ses accessoires pour 
AppleWorks, et avait continué avec de 
très bons produits. Je m'étonnais que la 
concurrence des TimeOut n'aie pas l'air de 
faire bouger Pinpoint : c'est qu'ils avaient 
le regard ailleurs. Développant un 
nouveau produit de PAO (Pages), 
Pinpoint en prévoyait une version 
Apple // en même temps qu'une version 
IBM et une version Mac. 

Mais le monde IBM, c'est celui du “Big 
Business”, des gros poissons et... des 
gros requins. Un petit jeune avec de bons 
produits, c’est intéressant pour les gros. 
On lui propose donc le gros coup, 
l'affaire tentante : ou on gagne gros, ou 
on perd tout. Pinpoint a joué. Et il a 
perdu. Exit Pinpoint. 

Là encore, c'est notre bon vieux chien qui 
reprend ie flambeau : Point to Point, 
l'excellent logiciel de communication de 
Gary Lütle, est maintenant un produit 
Beagle. 


ÿ L’Europe se rebiffe 


Après la volée de bois vert administrée à 
Apple par A2 Central pour son absence de 
support de l'Apple // dans le monde 
non-US, te numéro d'août publie un bon 
nombre de leures, d'Europe essentiel- 
lement, sur le thème “non, non, nous 





le // for ever 


1.-Y. Bourdin 


sommes toujours là”. Démarche méritoire 
de gens qui. au moins, montrent qu'ils 
connaissent A2 Central. Sauf pour le 
premier, vous trouverez leur adresse en fin 
de cet article. Mon conseil : écrivez-leur 
pour leur dire “bravo” et leur demander 
leur catalogue. J’ai noté : 
® le coordonnateur pour les produits 
Apple // d'Apple Computer France, 
Émile Schwarz, rappelle que son équipe 
TEAM avait entrepris la francisation du 
GS/OS 4.0 dès novembre 1988. Aussitôt 
que la version 5.0 sera prête, il compte 
s'y attaquer aussi. «Nous faisons tout 
notre possible pour retrouver la première 
place dans le cœur de nos clients, même 
si ce n'est pas facile». 
Bravo, Émile, et bon courage. Nous 
avons déjà montré, en épuisant en huit 
jours le stock du système 4.0, que vos 
efforts étaient appréciés. Pour le 5.0, 
nous attendons le “top” : pensez à prévoir 
large ! 
@ une boutique allemande qui vend par 
correspondance (catalogue en alle- 
mand) : Pandasoft 
@ une boutique suisse qui vend par 
correspondance: un concessionnaire 
Apple qui se spécialise sur l'Apple //! Il 
s'agit de Musicomp. Le catalogue est en 
allemand, mais la beutique est bilingue. 
® une boutique anglaise enfin, au 
catalogue très fourni MGA 
Microsystems. 


# Les mieux lotis : suite 


Je vous rappelle qu'aux USA, le GS 
couleur est nettement plus cher qu'un 
Mac Plus, encore plus cher dans la 
configuration un méga (et que je trouve ça 
nonnal, le GS valant effectivement plus). 
Or, j'ai regardé fin juillet les prix des 
configurations Mac Plus (15 000 F HT) 
et GS couleur un méga (9 900 F HT) sur 
3614 Apple : au prix d'un Mac Plus, en 
France, on a un GS avec deux mégas et la 
Transwaïp | 

Apparemment. la configuration GS mono- 
chrome n’est plus au catalogue : ça se 
comprend, la force du GS étant dans la 
couleur. D'ailleurs le prix du moniteur 
couleurs a baissé aussi (2 900 F HT). 
Mais ne jetez pas pour autant vos 





Porm's n° 43 








moniteurs monochromes ce sont 
d'excellents moniteurs, particulièrement 
sur les niveaux de gris. 


# La Capitale 


1! était bien temps que cesse ce provincia- 
lisme, et que chacun comprenne enfin où 
est la capitale, dans ce pays : cédant à 
l'insistance de nombre de ses clients (dont 
votre serviteur), Bréjoux envisage 
l'ouverture d'un magasin là où il faut, à 
Paris. Ce n'est pas encore tout à fait 
officiel, pas encore tout à fait décidé, mais 
ça va ouvrir vers octobre. Une bonne 
nouvelle pour l'Apple //. 


w Leurs dernières 
cartouches 


J'ai bien l'impression que c'est Monsieur 
Fourier, du Buyer's Guide, qui a raison. 
Ïl écrit dans le numéro d'été : «Après une 
période de latence, il arrive au GS ce qui 
s'est passé en son temps pour l'Apple //. 
Il est en train de devenir le petit Mickey 
qui n'a pas peur des gros, une machine à 
créer, el ce grâce aux développements 
annexes, tant en logiciel qu'en matériel», 
Cette perspective inquièle manifestement 
certains : après l'échec des différentes 
campagnes de “rumeurs”, on tire les 
dernières cartouches. 

Des quidams seraient allés récemment 
visiter des développeurs californiens, se 
faisant passer pour des employés d'Apple, 
pour leur dire de ne plus développer pour 
l'Apple //. Bien sûr, le FBI est sur 
l'affaire. Mais l'atout le plus sùr, c'est 
noire déternination collective. On prévoit 
la vente du cinq millionième Apple // 
pour 1990... 


Toujours Plus 


# Coprocesseurs 


Serait-ce l'influence de l'IBM ? Après la 
carte coprocesseur arithmétique 68881 
(voir Pom's 38 page 60), c'est Applied 
Engineering qui nous propose sa carte 
Fast\Taths, qui fait des calculs à la fois 
plus rapides et plus exacts (voir Bré joux 
pour la disponibilité en France). 

Sur l'utilité et les limites des cartes 
coprocesseurs arithmétiques, lisez l'article 
d'Alain Raynaud dans Pom's 41 page 45 























(eh oui, c'est dans la partie Mac : il faut 
tout lire dans Pom's). Entre autres, vous 
y apprendrez que, sauf si vous faites vos 
propres programmes maison. une carie 
coprocesseur n'est utile que si les 
applications dont vous vous servez ont 
prévu son utilisation : ei encore, pas 
n'importe comment. 

Ces deux cartes ont une interface avec 
l’Applesoft (en ce qui concerne la 
Floating Point Engine, il a été écrit 
par Glen Bredon). Mais ça ne suffit pas : 
la carte Floating Point Engine ayant déjà 
ses patches pour AppleWorks, on attend 
donc d'AE, qui est après tout le père de 
l'industrre du patch à AppleWorks, qu'il 
fournisse ses patches au tableur 
d'AppleWorks. 

R y a enfin une chose que j'ignore, posez 
la question à Bréjoux à son retour de 
vacances : la Fast Math intercepie-t-elle ou 
non, conune c'est le cas avec la FPE, les 
appels à SANE sur GS? En tout cas, le 
GS est prévu pour ça, el il faut qu'elle le 
fasse, 


ÿ Multimédia 
Interactifs 


Avant de parler d'HyperStudio, il faut 
dire un mot de la notion même 
d'Hypermédia, ou de “Multimédias inte- 
ractifs”, comme on les appelle main- 
tenant, pour comprendre ce qu'est cet 
“Hypercard couleurs” qu'est HyperStudio. 
Chacun connaît la question la plus 
courante à propos d'Hypercard : à quoi ça 
sert ? 

L'idée de départ, c'est tout simplement 
celle d'un nouveau mode de publication : 
si vous avez de l'information à 
transmettre, vous pouvez écrire un livre 
ou un article, enregistrer un disque, une 
cassette audio ou vidéo, faire une 
conférence, etc. Désormais, vous pouvez 
aussi faire une pile. 

Ce qui caractérise ce nouveau mode de 
transmission de l'information, c'est d'une 
part qu'il est “multimédia” : iliniègre en 
même lemps sons, images, animations el 
textes. Hypercard et HyperStudio sont 
donc entre autres utilisés pour piloter des 
lecieurs de vidéodisques ou de CD Rom, 
des magnétoscopes, etc. 

D'autre part, l'hypermédia est interactif 
parce que le récepteur de l’information 
m'est pas passif, comme devant une 
Émission de télé, puisqu'il "navigue" à sa 


a 


guise dans l'information proposée. Par 
exemple, au lieu d'avoir affaire à 
l'ensemble d'un arbre généalogique, on 
clique sur l'image du tonton Piard : on 
entend alors sa voix, et un écran s'affiche 
avec des informations sur lui. On choisit 
alors entre “en savoir plus sur le tonton 
Piard” et ‘ascendants du tonton Piard”. 
Etc. 

Aussi, parce que la structure même de 
l'information proposée dans une pile 
hypermédia n'est pas linéaire, séquen- 
tielle, comme dans un livre ou une 
émission de télé, mais ‘en arbre” : chaque 
carte se ramifie en sous-cartes plus 
détaillées, permettant d'approfondir un 
sujet et de se limiter à celui qui nous 
intéresse. 

Enfin, une pile hypermédia ne se 
“programme” pas : elle s'écrit, un peu 
comme on écrit une lettre. On n'a pas à 
connaître de langage” informatique. 
L'application hypermédia est elle-même 
un jangage, guère différent de l'interface 
utilisateur des applications habituelles. 
Bon, voilà pour la théorie. Pour en savoir 
plus, lisez la partie Mac de Pom's. Je 
reconnais qu'il y a quelques raisons 
d’avoir des réticences : d’une part, nous 
avons encore une fois eu droit à la 
chansonnette à la Mac Luhan sur le 
“dépassement” de l’écrirure et des livres, 
cette fois-ci par les multimédias inte- 
raclifs qui leurseraient bien supérieurs. 


Or, lecteurs, je vous avertis : l'hyper- 
média ne va pas faire diminuer voire 
bibliothèque, il va encore l'augmenter. 

La documentation d'Hyperstudio est un 
livre à lire. Et il faudra y rajouter la 
bibliographie sur Hypercard que vous avez 
lue dans Pom's 39. Ce n’est pas demain 
la veille que Pom's sera présenté sous 
forme de pile au lieu d'une revue. 


En plus, les piles étant faciles à réaliser, 
on a vu circuler, du côté Mac, des piles de 
piles dont beaucoup n'avaient guère 
d'uvérèt. 

Certes, il est faux de dire que l'hyper- 
média est le mode de communication 
d'aujourd'hui. Rien ne remplace un 
bouquin bien fait avec un bon index. 
Mais il est vrai de dire que c’est UN mode 
de communication nouveau, qui est en 
wain de trouver sa place dans la palette des 
médias. 

Par exemple, l'hypermédia est un outil 
exceptionnel pour l’enseignement : c'est 
la version contemporaine de ce qu'on 
appelait auparavant un “langage-auteur”. 
Attendez-vous aussi à trouver de plus en 
plus de guides d'expositions, de 
renseignements touristiques, et plein 
d'autres choses sous forme de piles. 

Bref, l'hypermédia est une des choses 
qu'un utilisateur d'ordinateur Apple doit 


savoir faire. En plus, il est vrai qu’à la 
différence de la programmation ancienne 
mode, c'est facile. Et cela fait des écrans 
attirants, séducteurs, beaucoup moins 
rébarbatifs que ce que nous faisions 
auparavant. C'est facile, et c'est joli : il 
faut s'y mettre. 


 HyperStudio 


S'y mettre, cela veut dire, pour les 
utilisateurs de GS, s'offrir HyperStudio, 
de Roger Wagner, puisqu'on ne nous a 
pas offert d'Hypercard avec notre machine. 
Ce n'est pas si grave : HyperStudio, à 
mon avis, est une bonne affaire. Voici 
pourquoi. 

La première chose que vous trouvez dans 
la boite, c'est un micro, un haut-parleur 
amplifié avec piles, et une carte de 
numérisation du son. Tout le nécessaire 
pour le son, en mono. La carte ne prend 
aucun slot, s’alimente sur la prise 
ventilateur du GS, toute autre carte stéréo 
ou de numérisation du son est compatible 
avec elle. 


Si vous êtes musicien, ce matériel ne 
vous suffira pas : songez à la Sonic 
Blaster d'AE et aux autres cartes. Mais 
si vous êtes un GSiste “ordinaire”, qui 
veut simplement entendre convena- 
blement les sons du GS et en mettre dans 
ses programmes, ce matériel est très intel- 
ligemment conçu et fonctionne très bien : 
par exemple le haut-parleur a un 
‘’économiseur de piles” automatique. 

Un logiciel de numérisation des sons est 
inclus, avec toutes les possibilités de 
traitement. Ce logiciel est indépendant 
d'HyperStudio, peut gérer tous les sons 
des disquettes DPA et autres, convertit les 
sons de la Sonic Blaster, etc. 

En plus, à la différence du soft de la Sonic 
Blaster, quand on a travaillé un son, il 
accepte de le sauver sur disque même en 
l'absence de la carte. 

Donc, avec HyperStudio, vous avez déjà 
un mini-studio pour le son. Vous avez en 
plus les outils graphiques nécessaires 
pour réaliser vos écrans, un très bon 
“Paint” en 640Ko. Tout ça, ce sont 
seulement les “bonus” : en plus, vous 
avez bien sûr HyperStudio pour faire vos 
piles. 

Je ne vous décrirai pas plus loin 
HyperStudio : ça marche, ça fait des piles, 
c'est beau et c’est facile. Standard 
ProDOS, faut-il le préciser ? 

Précisons cependant une chose : pour 
numériser les sons, la première carte à 
acheter est. une bonne extension 
mémoire. Pour faire fonctionner 
correctement HyperStudio, il faut... de la 
mémoire. Bref, 1,2 Mégas, c’est le 
minimum. 
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Précisons enfin qu’au moment où j'écris 
ces lignes, la version d'HyperStudio 
diffusée par Wagner est fonctionnelle, 
mais pas entièrement terminée : certaines 
fonctions ne sont pas encore 
implémentées, les XCMD (kèkcèkça ? 
voir la partie Mac de Pom's, bien sûr) ont 
une définition provisoire, le langage pour 
les scripts est en attente. Roger Wagner le 
sait et le proclame, mais il s'engage à 
vous envoyer automatiquement les mises 
à jour promises pour cet été. Renvoyez 
immédiatement votre carte d'enregis- 
trement. 


HyperStudio est disponible chez ToolBox 
et Bréjoux, et peut-être ailleurs. Je n'ai 
pas vu celle de Bréjoux, mais j'ai vu celle 
de ToolBox : la documentation française 
est aussi bonne que les #aductions 
Pom's, c'est tout dire. 


Excusez-moi, mais j'insiste : de même 
que si vous n'avez pas AppleWorks et 
UltraMacros, vous n'avez pas un 
Apple //, de même que si vous n'avez pas 
Hypercard, vous n'avez pas de Mac, de 
même que si vous n'avez pas Lotus 
-2-3, vous êtes un homme heureux, de la 
même façon, à partir de maintenant, si 
vous n'avez pas HyperStudio (et le 
Navigator de Marc Bavant), vous n'avez 
pas de GS. 


” Zip Chip 


Prenez ce qui va suivre avec de très 
longues pincettes, vu le record mondial de 
l'annonce anticipée que détient Zip 
Technology pour le Zip Chip. Zip 
Technology a annoncé pour la prochaine 
Apple Fest un Zip Chip huit bits à 8 
Mhz (avec un prix d'upgrade pour les 
actuels possesseurs de Zip Chip 4 Mhz) 
et un Zip Chip GS à 8 Mhz aussi. Bon, 
mais en matière de Zip Chip, il faut faire 
comme Saint-Thomas... Le Zip Chip 4 
Mhz, bien réel, est toujours en vente chez 
Pom's. 


Le mange-disques 


Le trust Beagle : 
suite 1 


Après Bréjoux, qui le sait et le diffuse 
depuis longtemps, Beagle vient enfin de 
se rendre compte qu'il avait, enfoui dans 
son fonds, le meilleur éditeur de 
programmes Applesoft : il s’agit de 
Program Writer, d’Alan Bird, un 
héritage de l’ex-Software Touch. Interface 
“à la Apple Works”, il se loge en mémoire 
auxiliaire si besoin. Macros, et tout ce 
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qu'il faut (sauf “hold” et “merge”, qu'il 
faut remplacer par des macros). Il est 
depuis belle lurette sur mon disque dur, et 
je m'en sers tous les jours. 


” Le trust Beagle : 
suite 2 


Vous vous rappelez, je l'avais demandé : 
quelque chose comme le “CellLink” des 
Spreadtools, mais pour la base de données 
d’AppleWorks. Un moyen de travailler 
sur plusieurs fichiers ensemble, de façon à 
donner à AppleWorks les capacités rela- 
tionnelles qu'il n’a pas. 

Eh bien, ça y est : il s'appelle TimeOut 
ReporiWriter, c'est un générateur de 
rapports relationnel. 

Il peut tirer ses infonnations de 11 
fichiers AppleWorks (base de données, 
tableur ou traitement de textes) ouverts en 
même temps. 250 catégories différentes, 
autant de totaux el sous-totaux qu'on 
veul. 

Avec ReportWriter (joint aux autres 
TimeOut, au moins UltraMacros et 
SpreadTools), AppleWorks devient un 
outil] “pro” qui peut satisfaire les besoins 
de 90% des PME : facturation, gesu'on 
des stocks, tout est désormais possible 
avec une facilité et une aisance très 
supérieures à bien des applications dites 
“pro” que j'ai vues sur d’autres machines. 
Et la version française ? 
Ne vous inquiétez pas : Daniel Lurot 
désassemble pour vous... 


# Mieux que le trust 


J'ai gardé pour la fin le dernier produit 
Beagle, car j'avoue que celui-là m'a un 
peu déçu. Il s'agit du GS Font Editor, 
éditeur de polices GS/Superfonts de Mark 
Simonsen pour tout Apple // 128Ko. I] 
fonctionne, il fait parfaitement son 
travail, mais. 

D'une part, ma commande était partie. 
il y a un an et demi, et c'est maintenant 
qu'il arrive. 

I] y a eu un peu de vaporware chez 
Beagle. D'autre part. c'est un Universal 
Font Editor que j'avais commandé : je 
supposais donc qu'il ne marcherait pas 
que pour les polices GS, et qu'il me 
permetWail des conversions. 

Enfin, et surtout, il arrive trop tard : nous 
avons déjà mieux. Pour le GS, nous 
avons le Fontasm de Stéphan 
Hadinger, qui est une excellente 
application GS (voir les DPA de ce 
numéro de Pom’s). Pour les versions 
128Ko, nous avons l'Édipol de Pom's 
39. Et pour un produit Beagle, on aurait 
pu attendre un TimeOut Font Editor : ce 





ne sera pas le GS Font Editor, mais le 
TimeOut Font Editor de... Daniel 
Lurot, que les Français auront avant les 
Américains (quelques privilégiés -suivez 
mon regard-- l'ayant déjà). 

La seule originalité du GSFE Beagle, 
c'est de pouvoir faire des sœurs aux 
polices GS à l'échelle choisie, et pas 
seulement double comme font les auwes. 
Le principe est agréable, mais de toute 
façon le résultat de ces polices générées 
mécaniquement est toujours à reprendre, 
en fait à refaire entièrement, à la main. 
Sans quoi, elles ont toujours des échelles 
et des épaisseurs affreuses. 


Bref, pour les éditeurs de polices, les 
Français sont meilleurs, et il y a une 
bonne raison à cela : avec nos accents, 
nous avons vraiment besoin d’un bon 
éditeur. 

Si Beagle ou d’autres veulent se rendre 
utiles en matière de polices GS, qu'ils 
nous fassent un utilitaire de conversion 
des polices Apple // polices 
Fontrix/Printrix, polices Print Shop, 
nous avons des tonnes de polices bit-map 
“nonnales” à convertir dans ces “‘rubans de 
bits” des polices GS, et ces polices Apple 
{{, ne venant pas du Mac, sont en 1x1. Si 
Beagle creuse dans son propre fonds, il en 
trouvera beaucoup. Il trouvera aussi de 
magnifiques polices type ‘“shapes” 
(polices “draw” et pas “paint”) dont nous 
aimerions une version GS. 

Oui, eh bien, même là, quelque chose me 
dit que les Français seront les premiers. 


# AppleWorks 3.0 


Imaginez que Claris s'adresse aux Beagle 
Bros, et leur demande d'apporter à 
AppleWorks toutes les améliorations dont 
ses utilisateurs ont jamais pu rêver. Et 
maintenant, ne rêvez plus, c'est chose 
faite ! Voici en quels termes A2-Cenkral 
du mois de juillet 89 annonçait la venue 
au monde de la nouvelle version 3.0 
d'AppleWorks 8 bits. 

Mes agents ‘“‘doubles-pommes”, qui 
étaient pourtant sur le coup, n’en sont pas 
revenus. Il y a vraiment de quoi se froiter 
les yeux. La nouvelle est officiellement 
confirmée par Clar'1s, et sauf contretemps 
le produit (en version américaine, bien 
entendu) dexTait être disponible en août. 
Tout d'abord, cet AppleWorks-là devrait 
sérieusement ralentir l’industrie du patch à 
AppleWorks : parce qu'il inclutla plupart 
des modifications nécessaires. 
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Par exemple, il reconnaît directement les 
cartes AE ou Checkmate, slot auxiliaire 
ou “slinky”, sans aucun patch. Comme 
les lnites d’AppteWorks sont repoussées 
à 16000 lignes dans le traitement de 
textes, 16000 fiches dans la base de 
données, 9999 lignes dans le tableur, que 
le presse-papiers n’a pas d'autres limites 
que celles de la mémoire disponible, les 
patches Applied Engineering et autres 
deviennent inutiles. 


Comme il inclut le chargement direct 
sans presser espace ni demander l'heure, 
qu'on peut imprimer jusqu'à 255 
exemplaires, qu'il inclut des routines pour 
le chargement des fichiers (y compris le 
chargement des fichiers textes) bien 
supérieures à PathFinder, qu'il navigue 
dans les sous-catalogues sans problème, 
qu'il sait sauver un fichier dans son 
sous-catalogue de départ, qu'on a trois 
unprimantes “mon imprimante”, qu'on 
peut éditer les imprimantes pré-définies, 
qu'on a la possibilité de définir jusqu’à 
six codes spéciaux pour l'imprimante à 
introduire dans le texte, que Pomme-H 
envoie un Fonn Feed à la fin, PathFinder 
et SuperPiint sont inclus, et beaucoup de 
patches sontsans objet. 

Comme le presse-papiers convertit 
désormais automatiquement les données 
entre traitement de textes, tableur et base 
de données, qu'un correcteur meilleur que 
Quickspell est inclus, qu'on peut 
couper-coller des colonnes et des blocs du 
tableur, certains TimeOut sont inclus. 
Comme on a désonnais des commandes 
pour introduire la date et l'heure (dans le 
format choisi), un Pomme-Delete qui 
détruit sous le curseur, des codes de 
conkôle supplémentaires pour les options 
d'impression, UlraMacros va gagner de la 
place pour autre chose. 


De plus, AppleWorks 3.0 fait sauter les 
limites les plus énervantes d’Apple- 
Works : j'ai déjà parlé des limites 
“quantitatives” qui sont repoussées, de la 
gestion de l'imprimante, qui passe enfin 
au niveau attendu (ouf !). Mais il y a 
aussi (enfin !), la justification à droite 
dans le traitement de textes, de vraies 
tabulations (et la reconnaissance des 
contrôle-I dans les fichiers textes chargés 
et engendrés par AppieWorks), des règles 
de tabulation comme dans AppleWorks- 
GS, avec tabulation sur le point décimal 
par exemple. Il y a enfin un scrolling 


horizontal dans la présentation multi- 
fiches de la base de données. 

Le Tableur a 26 nouvelles fonctions : 
cinq arithmétiques, neuf trigonomé- 
triques, six fonctions logiques dont un 
àISERROR, six fonctions financières. 


La Base de données a, comme le tableur, 
une commande “Titres” qui force la 
première colonne à rester sur l'écran dans 
le scrolling horizontal. La présentation 
multi-fiches peut être commandée par un 
fonnat de rapport. On peut avoir jusqu’à 
20 fonnats de rapport (au lieu de 8), par 
fichier. On peut enfin faire des rapports 
multi-colonnes (jusqu’à 24 colonnes) 
pour imprimer des étiquettes. On peut 
faire une recherche sur une seule 
catégorie, trier avec un panier de critères 
combinés sur plusieurs catégories, etc. 
Bien entendu, tout cela demande de la 
mémoire : il fonctionne sur les machines 
de 128K0, mais c’est pitié : le bureau est 
réduit à 40Ko (mais qui a encore i28Ko, 
au prix des Rams de nos jours ?). 

Tout cela demande aussi de l'espace 
disque : il faut déjà 4 faces de disques 
5,25" pour tout contenir, y compris le 
correcteur et son dictionnaire, et ça 
marchera avec deux 5,25”, sauf que ce sera 
la galère (mais qui n'a pas, aujourd'hui, 
lecteur 3,5” ou disque dur ?). 
Rappelez-vous, j'ai assez matraqué dans 
Pom's : si vous n'avez pas un méga de 
mémoire et un lecteur d'au moins 800Ko, 
vous avez une pièce de brocante, pas un 
Apple //. 

Bien entendu également. Apple Works 3.0 
récupère les anciens fichiers AppleWorks, 
mais les nouveaux ne seront pas 
compatibles avec l’ancienne version, si du 
moins on utilise les nouvelles fonctions. 
Ah oui, et la version française ? 


Pom's (et le tandem Geystor-Lurot) 
auraient les moyens de faire aboutir une 
version française indépendante, Mais en 
l'état actuel, ce n'est pas à ce niveau que 
la décision doit se prendre. Un peu de 
patience, laissons faire les spécialistes. 
Ce genre de wavail s'accommode mal du 
clarron sur les toits. 


# Copy II Plus 8.4 


Peu de changements dans ia nouvelle 
version (8.4) de Copy Il Plus, de Cenwal 
Point Software. Quelques routines 
améliorées dans le bit-cepieur 3,5”, des 
paramètres mis à jour. Si vous ne vous 
servez que du Filer (Utility), attendez la 
version 9.x pour demander une mise à 
jour compatible GS/OS. Si vous voulez 
une mise à jour pour le Copy II Plus 8.3 
acheté à Pom's, demandez-la directement à 
Central Point. 


————— ——  ———————————  ...  ————— 





Sous le capot 





” Transwarp : 
DMA, IRQ anc Co 


La documentation française de la 
Transwarp GS n'étant pas très claire 
sur ce que fait exactement l'option 
“Appletalk/IRQ" de l'accessoire Trans- 
warp, VOUS trouverez donc ci-dessous ce 
que j'en ai compris à la lecture de la 
documentation US. 

Le problème qu'a à affronter tout 
accélérateur, ce sont les routines où le 
temps d'exécution (timing) est critique, 
calculé par le programmeur en fonction 
d'un processeur non accéléré. Rien ne dit 
dans le programme que cette routine-là 
doit être ralentie, la carte ne peut donc pas 
le savoir, Et si elle ne ralentit pas, 
plantage et/ou dégâts sont garantis. 

La Transwarp s’en tire par une voie 
indirecte : la plupart des routines à temps 
d'exécution critique ne peuvent pas 
admettre les interruptions (l'accès au 
tableau de bord par exemple). 


Elles commencent donc par verrouiller les 
interruptions en entrée, pour les 
déverrouiller en fin de routine : c’est ainsi 
que vous ne pouvez pas avoir, heureu- 
sement, accès au tableau de bord pendant 
une éctiture sur disque. 

Mais le verrouillage et le déverrouillage 
des interruptions sont détectables par hard 
(RQ Disable). En conséquence, si vous 
avez choisi l'option “Appletalk/IRQ”, la 
Transwarp, supposant qu'il s'agit d’une 
routine à timing, cessera toute 
accélération tant que les interruptions ne 
seront pas déverrouillées. C’est donc une 
bonne mesure de sécurité. 

Le problème, cependant, c'est qu'un 
programme peut choisir de verrouiller les 
interruptions sans pour autant avoir de 
routines sensibles au temps d'exécution : 
soit par exemple que nous sommes dé jà à 
l'intérieur d'une routine de gestion des 
interuph'ons, qui ne peut pas elle-même 
être interrompue, soit que le programmeur 
ait oublié de déverrouiller les inter- 
ruptions en sortie (voir par exemple 
Pom's 40 page 62 sur Locksmith), soit 
encore parce que le programmeur a 
délibérément choisi d’inhiber les 
interruptions, par pure perversité, sans 
autre raison que la volonté de bloquer 
l'utilisateur. C'est fréquemment le cas 
dans les jeux, même sur GS, où l'on n’a 
plus d'accès au tableau de bord. 

Dans ces cas, l'option ‘’Appletalk/IRQ"” 
de la Transwarp ne permet pas d'accélérer 
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les programmes concernés, ce qui peut 
être dommage pour certains jeux. 
Finalement, je conscillerai donc de garder 
cette option en perinanence, mais de noter 
sur les disquettes des programmes 
concernés qu'il faut la désactiver avant de 
lancer le programme. 

En revanche, si voire joystick semble 
répondre mal dans certains jeux, c'estque 
les routines de lecture du joystick ont un 
“tüiming” qui, lui, supporte les 
interruptions (ce qui fait quela Transwarp 
ne le détecte pas), mais ne doit pas être 
accéléré : dans ce cas. il faut déconnecter 
l'accélération vous-même. 


Un mot aussi sur le DMA (Direct 
Memory Access) : tous les Apple // sont 
construits de telle façon qu'une carte mise 
dans un slot puisse “voler” la mémoire au 
microprocesseur de l'Apple //, sans que 
celui-ci s’en rende compte. C'est ce qui 
permet par exemple de transformer 
l'Apple /{ en ordinateur CPM-Z80 sans 
ajouter de mémoire, ou d'installer une 
carte cuprocesseur. 

C'est cette possibilité qu'utilise la 
Transwarp pour transférer le contenu de la 
mémoire ‘’lente” du GS dans la mémoire 
“rapide” du cache de la carte. Mais 
évidemment, tout le monde ne peut pas 
voler la mémoire en même temps. AE a 
donc été obligé d'essayer de rendre 
compatible au coup par coup la 
Transwaïp et les autres cartes qui font du 
DMA. 

Il y est parvenu avec ses propres cartes {la 
carte Z80 AE par exemple), avec la carte 
de disque dur Corvus, mais la carte 
FingerPrint de GSTI est pour le moment 
incompatible avec la Transwarp. 

J'ai déjà écrit (Pom’s 38, page 59) que la 
carte FingerPrint, qui finalement ne fait 
guère que le travail d'un CDA, ne me 
semblait guère indispensable. Or, la carte 
Transwarp est munie d’un connecteur sur 
lequel on pourrait sans doute brancher un 
bouton NMI. Du côté de la Rom, il y a 
de Ja place sur la carte : La partie occupée 
dans la Rom de la carte par la magnifique 
démo graphique/son que vous pouvez 
lancer, si vous le voulez, au démarrage, 
reste inutilisée après les premiers jours. 
La Transwarp pourrait donc être un jour 
un instrument de débuggage très 
pratique... 

La carte MultiKache, d'Ohio Kache 
Systems, est, elle, compatible avec la 
Transwarp, mais. à condition de 
supprimer la fonction de cache de la 
MultiKache, ce qui fait qu'elle ne sert 
plus à grand-chose. Là aussi, j’ai écrit 
(Pom's 41, page 60) que cette carte ne me 
semblait guère plus indispensable que la 
Fingerprint : là encore, je préfère donc la 
Transwarp. 


GS 16 Mégas 


En plus, la Transwarp nous rappelle une 
chose importante. La limite pour la 
mémoire du GS n'est pas 8 Mégas, 
comme on le dit trop souvent, mais 16 : 
SFFFFFF, cela fait 16 Mégas. Cc qui est 
vrai, c’est que le slot auxiliaire du GS 
n'admet que 8 Mégas maximum. La carte 
mémoire du slot auxiliaire peut aller des 
bancs $92 à S80. 

Mais ce qui est intéressant, c'est d'une 
part bien sûr que le processeur, lui, peut 
adresser 16 Mégas. Pas seulement le 
processeur d’ailleurs, mais le GS 
lui-même, sa Rom et son système. 


Les bancs de mémoire non installés, y 
compris entre $81 et SDF, le Memory 
Manager ne les marque pas absenis, mais 
occupés, pour que personne ne s’en serve. 


Mais il travaille sur 16 Mégas, et est tout 
prêt à les marquer hbres s'ils sont là. 


Ce qui m'a mis la puce à l'oreille, c’est 
de chercher à quel endroit la Transwarp 
avait mis son accessoire. En Ram ? Non. 
Dans l'espace de Rom au-dessus de $F0 ? 
Non plus. Il est dans le banc $BC. Eh, 
mais le banc $RC, ça n'existe pas, le GS 
n'est pas câblé pour ! C’est au milieu du 
trou. 


Effectivement : le GS n'est pas câblé 
pour. Maïs la Transwarp, si ! Oh, bien 
sûr, c'est de la Rom, pas de la Ram : 
mais le GS n’est pas câblé non plus pour 
avoir de la Rom en SBC. Et si je suis 
bien certain que si AE y a mis de la Rom, 
il pourra un jour y mettre de la Ram. Il y 
a un connecteur, sur la carte... 


# Pépins GS 


Îl est utile d’avoir plusieurs GS (à défaut, 
il est utile d'avoir des amis avec GS) : si 
voire Transwarp GS ne marche pas, 
essayez-la sur un autre. Bien souvent, 
vous vous rendrez compte que c'est du GS 
que vient le problème. Je connais pour le 
moment trois cartes qui font un excellent 
test pour la carte-mère du GS : la 
Transwarp GS, la PC Transporter, et la 
carte du disque dur Mégacore. 

Si votre GS marche impeccablement sans 
la nouvelle carte, si la nouvelle carte 
marche impeccablement sur un autre GS, 
c'est que votre GS avait depuis le 
début des pépins dont, par hasard, vous 
ne vous étiez jamais rendu compte. Il est 
important de connaître le nom juridique de 
ce genre de pépin : on appelle cela un 
“vice caché”. Pourquoi est-ce important ? 
Parce que c’est l’un des cas où l’on n’a 
pasle droit de vous dire que la garantie est 
terminée. 
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# GS Club 911 


Le club le plus nombreux des possesseurs 
de GS n'est pas le GS Club 94, où 
l'adhésion est très utile, mais volontaire 
(voir Pom's 41 page 59). C'est le GS 
Club 911, qui rassemble involontai- 
rement un bon nombre de possesseurs de 
GS, abonnés de fait à l'erreur 911 (voir 
Pom's 38 page 62). 

Avec trois GS sans erreur 911, je me 
sentais jusqu'ici injustement exclu, 
quelque peu jaloux, ne pouvant parler que 
pér ouï-dire du message d'erreur favori des 
utilisateurs de GS. C’est un logiciel qui 
m'a enfin ouvert la porte du club : il 
s'agitde TEST DRIVE IE 


Pourquoi ? Eh bien, ce coquin, sans 
prévenir, modifie la Ram sauvegardée, et 
met le tableau de bord dans une 
configuration clavier où le délai d’auto- 
répétition des touches est au plus court 
possible, tandis que la vitesse de 
répétition est la plus rapide possible. 
Quand on sort de Test Drive Ii par Reset, 
on a un clavier qui garde la vitesse de la 
Ferrari, et qui fonce. jusqu'au plantage. 
Cela nous indique peut-être une solution. 
D'abord, cela révèle que l'erreur 911 est 
bien ce qu’elle prétend être, à savoir une 
erreur de synchronisation entre le 
microprocesseur du GS et le micro- 
processeur du clavier ADB : quand le 
clavier va au plus vite, le GS ne suit plus. 
Et cela donne peut-être un remède à tous 
ceux qui n'ont pas attendu Test Drive Il 
pour être admis dans le club : si vous 
ralentissiez le clavier dans le tableau de 
bord ? Merci de nous faire savoir si ça 
marche. 


# La guerre des durs 


Amusante bagarre publicitaire, ces 
derniers temps, entre Applied Inge- 
nuity et Applied Engineering qui 
est en train de sortir son disque dur inteme 
Vulcan, concurrent du disque dir mterne 
Inner Drive d’AI, lequel se vend très 
bien depuis un bon moment. 


Pour ma part, j'aurais tendance à renvoyer 
tout le monde dos-à-dos : d’une part parce 
que ces deux disques durs sont bons. 
D'auire pan, parce qu'il existe un standard 
Apple en matière de disques durs, c'est le 
SCSI (dois-je rappeler comment ça se 
prononce ?)}, qui a entre autres l’'énonne 























avantage de permettre de chaïner les 
engins SCSI, et d'être compatible avec le 
Mac. Ni l'Inner Drive ni le Vulcan, par 
ailleurs tous deux très bons, ne sont 
chaïnables. 


Il y a déjà des disques durs SCSI 
dispenibles (chez Apple et chez ToolBox, 
et dans nombre de boutiques Mac). 
Cirtech prépare pour l'Apple // un de ces 
disques durs tout entiers contenus sur une 
carte dans un slot que l’on connaît chez 
les galériens, mais avec un port SCSI 
pour brancher la suite. Et il semble que 
l'avenir est dans les lecteurs de disquettes 
haute capacité, ou si l'on préfère les 
disques durs amovibles. American 
Micre Research et Create Techno- 
logy en fabriquent pour le Mac, qui 
fonctionnent parfaitement sur un Apple // 
SCSI. 


 Rams : la baisse 


Au moment où j'écris ces lignes, les 
puces 1 Mégabit sont à 128 F HT pièce 
{ 000 F HT le méga) chez ICAR à Gap. 
Attention, les prix changent souvent, 
téléphonez avant. Et n'oubliez pas que 
quand on se groupe pour acheter, on peut 
négocier. 


Merci à Mr Mangin pour l'adresse : si 
vous en connaissez d’autres, nous 
sonunes preneurs. 


Patchworks 





# Sauvetage 
AppleWorks 


Vous avez bien failli être privés 
d’“Apple // For Ever” ce mois-ci : quand 
la confiture de framboises (!) se répand 
jusque sur la disquette de backup, le 
désastre est en vue. Après nettoyage, il 
restait un fichier traitement de textes 
Apple Works dont seul le dernier blocétait 
abimé. Que faire pour le récupérer, 
sachant qu'AppleWorks refusait de le 
charger ? 

J'aurais pu demander à AppleWorks de le 
charger conune un fichier texte, mais je 
n'avais plus le temps d'enlever “à la 
main” tous les détritus de fin de ligne. 
J'ai bûché Lurot (Pom'’s 42, page 11) 
pour essayer de reconstituer une fin de 
&chier acceptable par AppleWorks (en 


mettant des FFFF à la fin, etc.), mais je 
ne suis arrivé qu'à faire planter 
sauvagement AppleWorks. 

Si vous lisez ceci, c'est donc grâce à... 
AppleWorks-GS ! Le grand frère 
d'AppleWorks est beaucoup moins 
exigeant que lui dans le chargement des 
fichiers AppieWorks, parce qu'il les 
convertit au fur et à mesure, et qu'il prend 
tout ce qui est bon dans le fichier. On 
sauve ensuite sous forme de fichier texte, 
et le tour est joué. Espérons que ce truc 
fonctionnera d’autres fois. 


# Buffer : méfiance 


Ayant utilisé à peu près de toutes les 
façons possibles le buffer des ports série 
du GS, ayant même préparé pour Pom's 
une routine de configuration du buffer à 
64K), j'en suis anivé à une conclusion 
nette : il ne faut pas se servir du buffer du 
GS, il est buggé. Si vous choisissez 
l'option 2Ko, SuperPolices plante après 
les dix premières lignes. Si vous le 
poussez à 64Ko, quand le buffer sera 
saturé, il vous supprimera quelques pages. 
Attendons les nouvelles Roms pour voir 
si les bugs seront réparés. 


# Patch Tarzan 


Ceux qui ont le Sysbeep de la disquette 
DPA 10, et les nouvelles DPA de sons 
GS, ont désormais des “Bip” fort 
exotiques sur leurs GS. Dommage 
qu'AppleWorks ne les utilise pas, 
préférant son propre bip. 

Le patch qui suit (présenté sous la forme 
“standard Pom’s“ : une macro Ulira- 
Macros) m'a donné une des plus belles 
tranches de rire de mon existence, quand 
ma femme, non prévenue, a entendu 
AppleWorks lui envoyer le cri de Tarzan 
en guise de message d'erreur | 

Ce patch/macro est tout simple et 
inoffensif : il détourne le bip d'Apple- 
Works (vecteur en $1115, merci à Daniel 
Lurot qui sait tout ça par cœur) vers une 
mini-routine en $300, laquelle, sans 
interdire le “onerr” d'UltraMacros, se 
contente de renvoyer vers le bip 
“ordinaire” de la Rom (SFBDD). 
Simplement, sur GS, ce bipest lui-même 
détourné vers Tarzan par Sysbeep. 


start 

<ba-]> :<all><peke 6197, 0 : poke 
6198, 3 : poke 768, 44 : pcke 7 
6,130 : poke 770, 192 : poke 77 
1, 32 : poke 772, 221 : poke 77 
3, 25 : poke 774, 44 : poke 775 
» 131 : poke 776, 192 : poke 77 
7, 44 : moke 778, 131 : poke 77 
9, 152 : poke 780, 96> ! 

end 


# Bonnes vacances, 
Eric ! 


L'ami Éric Weyland, occupé par ToolBox 
et ses vacances auprès des pelites 
anglaises, me transmet quelques patches à 
AppleWorks bruts de décoffrage, en 
espérant que je vais me charger d'en faire 
de belles macros. H se trompe : je les ai 
simplement essayés, et je vous les 
ile ie tels quels. Bonnes vacances, 
ric | 


®  AppleWorks a un bug irritant quand 

i charge des fichiers textes : si vous 
avez une ligne continue de plus de 60 
caractères sans espace dans le fichier texte, 
AppleWorks vous rajoute de force un 
espace à la colonne 61. Pour êter ce bug : 
trouver dans le fichier SEG.MI la chaîne 
hexa E0 3D 90 CF EO di et la remplacer 
par EO 41 90 CF ES 41. 


@ Les flèches en “-->" d'AppleWorks 

seront avantageusement remplacées 
par le # des caractères souris quand il 
s’agit de cocher un choix dans une liste. 
Pour ce faire, trouver dans AplWerks. 
System (ou ApiWorks.Sys) la 
chaïne hexa 8C 60 04 20 2D 2D 3E et la 
remplacer par 8C 60 04 20 20 20 C4. 
Trouver dans SEG.M1 les chaînes 31 60 
03 2D 2D 3E et 46 60 03 2D 2D 3E et 
remplacer à chaque fois le 2D 2D 3E par 
20 20 C4, Attention, ne pas remplacer les 
autres chaînes en 2D 2D 3E. 





Encore une partie 
et j’éteins 





Kill A Mac 


C’est le jeu le plus drôle que j’ai vu cette 
année sur le GS. C'est aussi celui qui 
démontre le mieux les possibilités 
d'animation graphique, de “scrolling”, de 
jeu sur les couleurs, du GS. C’est le 
premier logiciel qui reconnaît la 
Transwarp. Il est bourré de ce qu'on 
appelle là-bas des “œufs de Pâques”, 
c'est-à-dire des surprises cachées, des 
blagues partout. 

Essayez de bouger le joystick pendant le 
chargement du jeu, regardez conunent on 
calibre le joystick, accédez au tableau de 
bord, faites des erreurs, informez-vous sur 
les auteurs, j'en passe et des meilleures. 
Un humour dément. 

Le principe n'est guère plus compliqué 
qu'Arkanoid c’est un tir, tout 
sunplement, il faut abattre des cibles. Ces 
cibles sont des bugs, des disquettes, et 
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surtout. des Macs. Vous avez 2 min 15, 
c’est tout, pour sauver l'Apple //. 

Le nom de ce jeu ? As the Link 
Turns (ATLT). Son prix ? Gratuit, 
domaine public, eh oui. À ce prix-là, avec 
cet humour-là, cette technique-là, c’est 
Wozniak qui est de retour ! Ça, c’est 
l'esprit Apple //, bon sang, et vous savez 
qui diffuse ce jeu ce jeu iconoclaste et 
gratuit ? Apple, bien sûr, sur Apple 
Link ! Ramez, galériens : Apple // fort, 
et vert! 

Vous le trouverez bien entendu sur les 
nouvelles DPA de ce numéro de Pom's. 
Attention, il faut le lancer sous GS/@S 
{iancez /ATLT/PROG/ATLT.SYS16), et 
il faut ABSOLUMENT le voir en 
couleurs (dites, ce n'est quand même pas 
le prix du câble GS/Péritel qui vous 
reu'ent ?). Allez, bonne chasse ! 


Privilèges 


Avouez-le : depuis que vous avez eu la 
disquette de démo gratuite, vous bavez 
d'envie. Des dessins magnifiques, des 
sons d'enfer, des caractères animés d'un 
écran de haut pilotés au joystick, 4 Mégas 
de dessins et de sons, c'est vrai. Cela 
s'appelle Sword of Sodan, de 
Discovery Software, c'est désormais 
LE standard du jeu d'arcade sur GS. Et 
vous vous morfondez en l’aitendant. 


Sachez, impatients, que quelques 
privilégiés dans le genre “Contributing 
Editor to a french Apple Magazine” (eh, 
eh...) ont pu “tester” (c'est-à-dire jouer 
avec) une “pré-version” (entièrement 
fonctionnelle en fait) de Sword of Sodan. 
Alors voilà : le jeu est bien du niveau de 
ce que promettait la démo. 


Une richesse de graphismes et de sons 
extraordinaire, des animations qu'on ne 
croyait pas possibles. 

Une seule “critique” des “testeurs” : le jeu 
est peut-être un peu facile. En dehors des 
passages où ces satanés stalactites vous 
tombent dessus et ceux où ces darnnés 
pieux sortent aléatoirement du sol, on tue 
assez facilement les ennemis en jouant 
beaucoup à genoux. Bref, on s’en sort en 
cinq ou six heures. Mais cinq ou six 
heures qu'on ne regrette pas ! 

Donc, soyez patients, ça vaut le coup. Au 
moment où vous lirez ces lignes, 1l sera 
temps d'envoyer votre commande, Et si 
votre version est un peu plus difficile, 
vous saurez à qui vous en prendre... 


#” AIG, Michel. 


— Ah, c'est toi, Jean-Yves ? Tu 
tombes bien, je suis en panne de 
lunarium, tu ne pourrais pas m'envoyer 
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ce que tu as ? Tu comprends, si les nazis 
$arrivent avant moi sur la lune, je ne 
pourais plus sauver la fille du professeur. 


— Euh, ça va Michel ? Tu pourrais 
t'expliquer un peu ? 
— Je te parle de Rocket Ranger, 
bien sûr, le dernier Cinemaware. 
Une combinaison de jeu d'action et de jeu 
de stratégie très bien faite, avec la qualité 
réellement cinématographique de C'inema- 
ware. Ce coup-ci, c’est le genre 
super-héros, mais avec énormément 
d'humour, et une qualité d'animation que 
je n'avais pas vue jusqu'ici. Mais si tu 
n'arrives pas à rattraper le Zeppelin au 
départ, après il te faudra du lunarium, tu 
comprends. Bon, promis, tu m'envoies le 
tien ? 
Lecteurs, je voudrais vous demander deux 
choses : d’une part, achetez Rocket 
Ranger. J'ai entendu dire que 
Cinemaware, qui est de très loin le 
meilleur éditeur de jeux GS, avait des 
difficultés en ce moment (comme 
d'ailleurs nombre d'éditeurs de jeux, à 
cause de la concurrence des consoles genre 
Nintendo). Il faut qu’ils sachent que nous 
voulons qu'ils continuent. Ensuite, 
envoyez votre lunarium à Michel, aux 
bons soins de Pom's. Merci. 


# En vrac 


© The Hunt for the Red October, 
de The Software Toolworks 
(ChessMaster 2168), reprend agréa- 
blement le roman du même nom, c’est 
une excellente simulation d’un 
sous-marin nucléaire hyper-moderne. 
Mais pourquoi empêcher de le mettre, 
comme ChessMaster, sur ie disque dur ? 


@ “Tout fout le camp, ma bonne 

dame” : dé à qu'on ne trouve plus de 
bons fromages, que le Mac a des slots, 
que les curés s’habillent en blousons 
noirs, qu'on fait des piles sur l’Apple //, 
et voilà maintenant qu'il y a des images 
dans les Infocom ! Eux qui étaient 
spécialisés dans les jeux d'aventure en 
mode texte pur, voilà maintenant qu'ils 
commencent avec Shogun à mettre des 
illuswations. Très belles illustrations, 
j'en conviens, qui n’enlèvent rien à la 
qualité du jeu, au contraire, mais enfin, 
quand même, quand on sait que ce n'est 
que le début d’une nouvelle série, où 
va-t-on, je vous le demande. 


@  Silpheed, de Sierra On Line, 

c'est le retour, mais sur le GS, avec 
les graphismes et le son du GS, des 
Defender du ben vieux temps. Jeu d'arcade 
amusant et sans prétention, mais avec 
plein de tableaux : tout n’est pas perdu, 
ma bonne dame. Et en prime, Silpheed, 
lui, se met sur le dur. 





@ Balance of Power 19960, de 
Mindscape, c'est la mise à jour 
sur GS de cet excellent jeu de géopolitique 
qui avait tant plu sur Mac. 
Mise à jour du point de vue de ja 
programmation, avec la couleur du GS, 
mise à jour du point de vue de la 
complexité du jeu, avec un Tiers Monde 
plus autonome, un jeu multipolaire. 
Reste qu'il est, comme la géopolitique à 
la Kissinger, chaque jour de plus en plus 
dépassé du point de vue politique : 
dépêchez-vous d'enfoncer les Rouges 
(sans lancer la 3ème Guerre Mondiale, 
attention), avant que Gorbatchev n'adhère 
au FMI... 


# À suivre 


Pas eu le temps de tout déballer. 
Rendez-vous dans un prochain Pom's 
pour parler de : 


© Lords of the Rising Sun de 
Cinemaware : 

@ Neuromancer GS (la version 
Île est déjà excellente) d’Acti- 
vision/Médiagénic ; 

© BattleChess, le jeu d'échecs 
dément, toujours d'’Activision/ 
Médiagénic ; 

@ Halls of Montezuma d'Elec- 
tronic Arts ; 

®  Pinball Wizard, ie “Pinbaii 
Construction Set” GS d’Accolade ; 

@ Bad Street Brawler de Mind- 
scape. 


” Carmen 


La série des Carmen San Diego, de 
Broderbund, connaît un succès mérité : 
ces jeux ont beau être éducatifs (ils le 
sont), on s'en moque, on joue pour le 
plaisir. La géographie est en prime, mais 
on n'évilera guère de consulter les 
équivalents US de nos Guides Bleus qui 
sont livrés avec le jeu. 

La version GS de “Where in the World is 
Carmen San Diego ?” a de superbes 
graphiques. Certains grincheux la 
trouvent lente : c’est tout simplement 


qu'il faut la lancer avec GS/OS 5.0. 

Qui dit géo dit histoire : on attend pour 
cet automne “Where in Time is Carmen 
San Diego ?', ou Carmen fera des 
voyages dans le temps. Le logiciel sera 
accompagné d'une encyclopédie de 1300 
pages ! 
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16 bits 


w Système 5.0 : bravo 


Finalement, ça y est, et c’est est allé 
plutôt vite : espérons qu’Apple ne mettra 
pas beaucoup plus de temps entre son 
annonce du système 7.0 pour le Mac et sa 
sortie effective qu'il n’en aura mis pour te 
système 5.8 du GS. Je voudrais tout de 
suite dire trois choses à ce sujet : 


@ à Apple : bravo. C'est un magni- 

fique ensemble, un développement 
de très haut niveau. J'ai toujours dit 
qu'Apple avait tous les défauts du monde, 
et une seule qualité indiscutable : il fait de 
bonnes machines (et ça tombe bien, parce 
que dans le fond, qu'attendre d'autre d’un 
fabricant d'ordinateurs ?) : 


® aux développeurs : s’il vous plaït, 

chargez vos segments par leur nom, 
et pas par numéro. C'est tout ce qui est 
exigé pour bénéficier de l'ExpressLoad du 
5.0, et au fond, n'est-ce pas la pratique 
normale ? 


© aux utilisateurs : je serais vous, 
j'irais réserver tout de suite mon 5.0 

français chez mon concessionnaire. On 

s’arrache les nouveaux systèmes, sur GS. 


Et, même si tout est fait pour une 
transparence maximale pour l'utilisateur, 
il faut comprendre ce qui se passe, si on 
veut pouvoir tirer le maximum d’un 
système si complexe. Pierre Demblon 
s’est engagé à faire pour le 5.0 français ce 
qu'il a fait pour le 3.1, mais ça ne 
remplace pas les documentations utili- 
sateur officielles Apple. 


Deuxième conseil, toujours le même : de 
la mémoire, encore de la mémoire. Le 
Finder fait à lui seul plus de 200 blocs, je 
ne parle pas des nouveaux outils, CDEV 
et Cie. 


La pente est irréversible, et l'on est 
retourné à des prix très honnêtes sur les 
Ram. Le choix d'Apple, pour le moment, 
c'est l’accéléranon par soft : le coût, c'est 
la mémoire. Mars vraiment, ça vaut le 
coup. Et comment s'étonner que le GS 
s'étende… par son slot d'extension ? 


Si vous n'avez pas assez de mémoire, 
vous allez me dire que je raconte des 
blagues, parce que le 5.0 marchera, mais 
sans ses accélérations. Même Glen Bredon 


l'a accepté dans son Merlin 16 : le prix de 
la vitesse, c’est le gaspillage de la 
mémoire. C’estun point sur lequel il faut 
nous libérer (pas totalement, n’exagérons 
rien) de la ‘mentalité Apple //” de ia 
chasse à l’octet en trop. 


y Système 5.0 : 
l’accélérateur soft 


Les choix d'Apple sont nets, et 
clairement proclamés : dans l’état actuel 
des choses, accélérer le GS par hard 
coûterait assez cher aux utilisateurs, et 
n’accélérerait que les nouvelles machines. 
C'est donc par soft qu'on va le faire, de 
façon à accélérer toutes les machines et à 
ne coûter éventuellement que le prix de 
quelques puces Ram. Pour l'accélération 
hard, voir Transwarp. 


En d’autres terres : il y aura bien sous 
peu une nouvelle carte-mère de GS, au 
moins de nouvelles Roms, puisque 
ISYSTEM.SETUP du 50 inclut un 
Fichier TS3 (Tool Setup 3), tout petit, 
pour ces nouvelles Roms. Mais il ne sera 
pas particulièrement accéléré. 

J'ai déjà critiqué ici cette course à la 
vitesse d'horloge du microprocesseur 
qu'on voit ailleurs, qui se traduit par des 
gains quasi-nuls, ou infimes, pour 
l'utilisateur. Un bègue ne parlera pas 
mieux en parlant plus vite, mais il parlera 
plus vite en parlant mieux. Le système, 
l'interface entre l'utilisateur et les 
applicau'ons, devient de plus en plus 
décisif de nos jours. Avec le 5.0 sur GS 
comme avec le 7.0 sur Mac, les 
révolutions logicielles majeures ne sont 
plus apportées par les applications (qui ne 
sont après tout que des interfaces avec la 
ToolBox), mais par les systèmes. Je 
comprends donc très largement ce choix. 


De toute façon, un accélérateur hard 
accélère tout, mécaniquement, d’un facteur 
2 ou 3. Un accélérateur soft, se 
concentrant sur les poiits cruciaux qui 
ralentissent (le chargement, les fenêtres), 
peut accélérer d’un facteur 10 ou 15. Pour 
rouler plus vite, avoir une voiture plus 
rapide ne change rien si l'on va de 
bouchon en bouchon. Ce qu'il faut 
d’abord, c’est faire sauter les bouchons. 
Le système S.0, cela veut dire 
AppleWorks GS chargé en 1S secondes, 
voir ci-dessous (mais pourquoi diable 
acceptions-nous si mal qu'AppleWorks 
GS mette autant de temps à se charger sur 
3,5" qu'AppleWorks 8 bits n’en met sur 
5,237 0) 

Cela veut dire aussi des drivers de SCSI et 
de disque 3,5” réécrits, ultra-rapides. Sur 
3,5”, ne vous occupez plus de l’entre- 
lacement au formatage de vos disques : il 
est de toute façon de 1x1, le plus rapide 


possible, au niveau du driver, qui hit toute 
la piste en mémoire, puis transfère les 
blocs demandés (en gros, ce que faisait 
Diversi-Cache en plus du cache). 


Cela veut dire aussi un temps de passage 
aller-retour entre GS/OS et ProDOS 8 
considérablement réduit, GS/OS restant 
en mémoire (une remarque d’ailleurs : tant 
qu'on y est, pourquoi ne pas mettre P8 en 
réserve en mémoire ? Il n’est pas si gros). 
De la même façon, QuickDraw et les 
autres outils graphiques sont considéra- 
blement, mais vraiment énormément, 
accélérés, ainsi que les outils pour 


l'impression, et même le Memory 


Manager. je me suis même suipris à 
utitiser le Finder pour copier des disques, 
mais si ! 


# Système S.0 : 
le Dunlopillo de 
l’utilisateur 


Le 5.0 apporte également un paquet de 
“plus” qui sont autant de confort en plus 
pour l'utilisateur, ainsi d’ailleurs que pour 
le programmeur. 

Commençons d'ailleurs par le 
programmeur : un éditeur de texte plein 
écran, graphique, est dans la boîte (les 
éditeurs et traitements de textes vont 
beaucoup se ressembler, bientôt). Un 
Ressource Manager nous donne ce super 
confort du Mac : faire la version 
norvégienne sans même recompiler. 
Alors, dès que nous aurons le ResEdit 
{qui va faire le premier ?), il va être bien 
difficile de distinguer entre la “partie Mac” 
et la ‘partie GS" de Pom's ! D'autant que 
nous aurons de plus en plus les mêmes 
applications (eh oui : on ne programme 
plus une machine, encore moins un 
microprocesseur, on interface une boîte à 
outils). 

Sans compter diverses commodités pour 
programmeurs, que je ne détaille pas ici : 
sachons seulement que le service est bien 
fait dans la maison Apple. 


Pour l'utilisateur, un driver de carte 
parallèle qui accepte la parallèle Apple 
(vous savez, la Wozniak pur jus) ; le 
tableau de bord en NDA sur le bureau, 
avec les CDEV du Mac: un menu de 
CDA qui défile, jusqu'à je ne sais pas 
combien de CDA. Même chose d’ailleurs 
avec les NDA, les CDEV et avec tous les 
menus, Qui pourront défiler (jusqu'à 255 
items dans un menu, ça fait combien 
d'écrans, ça ?). Les dialogues pourront 
désormais inclure des menus (“pop-up 
menus"). 

En plus de tout ça, un P8 version 1.8 
(comme le temps passe.) qui perrnet des 
noms de volume en minuscules pour 
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GS/OS, fixe un petit bug de Delete, peu 
de choses. 

En revanche, ils ont cette fois-ci touché à 
Basic System (version 13), pour y 
inclure les principaux patches faits 
jusqu'ici : correction du bug du Chain 
(bug réel, mais rare), un BSAVE qui 
permettra (enfin) de raccourcir un fichier 
(sauf si on utilise le paramètre B), la 
fameuse commande MON qui ne faisait. 
absolument rien est remplacée par un 
MTR qui remplace Call - 151 (accès au 
moniteur). 

Enfm, mais ça ne concerne que peu de 
monde sous nos latitudes, les réseaux 
Appleshare sont parfaitement intégrés au 
nouveau système (je (rouve même que ça 
gonfle un peu beaucoup le Finder), on 
poura avoir des GS sans aucun disque, qui 
démarrent (bootent) sur lc réseau. 

J'ai oublié ce qui est peut-être l'essenticl : 
la structure même du système, modulaire 
au possible (FST, CDEVS, INITS, 
DRIVERS, TOOLS, etc.), très ouverte 
pour permeltre toutes les évolutions, sans 
parler des limites quantitatives qui sont 
tombées (7 disques par slot, et 32 
partitions par disque, Ça ira pour le 
moment). 

Tel que c'est paru, je risque d’avoir à dire 
mes “bravo Apple” tous les six mois. En 
tout cas, il y a une chose que je ne 
perçois pas bien : quelles sont les limites 
de ce système ? 


” Prosel 16 


Si j'ai attendu un peu pour vous parler de 
Presel 16, c'est d’une part qu'il n'est 
pas facile à trouver : Glen Bredon le 
diffuse tout seul comme un grand (quand 
il n'est pas en vacances), et n'accepte que 
les mandats-poste internationaux. C'est 
d'autre part que j'attendais la version 
GS/OS, ce qui est le cas avec les versions 
TX 

Le seul véritable ennui que rencontrent 
Copy II Plus et Prosel 8 avec GS/OS, ce 
sont les fichiers extended, ou “fichiers du 
Se type”, voir Pom's 42. Jusqu'à présent, 
seuls Gribouille et le système 5.0 
utilisent ces fichiers. 


Si vous n'avez ni Fun ni l’autre, Prosel 8 
reste impeccable, vous n'avez pas besoin 
de passer à Prosel 16. Le 5.0 arrive, mais 
si vous n'utilisez que le sélecteur de 
Prosel 8, et pas ses utilitaires disque, tout 
marchera sans problème avec le 5.0, 
seulement plus vite, 


Ce qui caractérise Prosel 16, c'est d'une 
part qu’il est sous GS/OS : en 
conséquence, il reconnait plus de deux 
disques par slot, il fonctionne avec les 
numéros de ‘‘device" ct les préfixes de 
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GS/OS. Concrètement, cela veut dire 
entre autres que je dois taper ‘*3”’à la place 
de “51”, et certains jours je confonds 
encore un peu. 

Ï inclut aussi quelques caractéris® ques de 
GS/OS (copie avec cache, sessions, 
reboot officiel Apple, etc), mais d'abord 
la vitesse du 5.0, et c’est l'essentiel. 

Les utilitaires Prosel, au lieu d'être 
séparés, sont désormais des segmenis du 
(gros) programme principal, au lieu d'être 
des fichrers à part (sauf Block Warden, 
qu'on peut de toute façon lancer par P8). 
Comme il récupère les fichiers Prosel du 
sélecteur et les écrans Prosel, et qu'il 
fonctionne de la même façon que Prosel 
8, on n'est pas dépaysé. 


Les “Backup” et “Restore" fonctionnent 
désormais par fichiers et non plus par 
blocs, si bien qu'on peut restaurer le dur 
sur une parütion d'une autre taille (enfin). 
Glen Bredon doit faire des complexes 
face à APW : il a fallu qu'il mette dans 
Prosel un “shell” à la APW, avec des 
commandes disques comme ii l'avait déjà 
fait pour Merlin, des fichiers exec (des 
“scripts"), etc. Du coup, on a une 
commande Heip bien pratique. 

Quitte à faire des fichiers exec, j'ai 
toujours pensé jusqu'ici que Basic System 
avec ProCommand (de Glen Bredon) 
pouvait tout faire vite et bien. C'était vrai 
avec ProDOS 16, qui avait les mêmes 
limites que ProDOS 8. Ce n'est plus vrai 
avec GS/OS, où ProDOS 8 est dépassé. 
C'est peut-être bien Merlin 16 qui va le 
remplacer. 


Bon, je conclus : Merlin 16 est au 5.0 ce 
que Merlin 8 est à ProDOS &. Sauf que, 
comme sélecteur et copieur de disques et 
de fichiers, il a un concurrent désormais 
très utilisable : à savoir le Finder. Pour le 
moment, il me semble donc que Merlin 
16 est indispensable seulement à ceux qui 
ont un disque dur, ou autres gros engins. 
Si vous avez, comme beaucoup, 1,2 
Mégas de mémoire, deux lecteurs 3,5" et 
un ou deux 5,25" pour la nostalgie, la 
combinaison Finder/Merlin 8 est 1rès 
suffisante. Si vous voulez un sélecteur en 
mode texte, mais sous GS/OS, pour aller 
plus vite que le Finder, Squirt 16 (voir les 
DPA) y pourvoira. 

Ceci dit, Prosel 16 est un logiciel 
d'avenir, et bravo à Glen Bredon d'avoir 
su si vite et si bien digérer GS/OS. 


# AppleWorks 1.02 


Quelques-uns d'entre vous m'ont dit que 
j'avais peut-être été un peu trop 
enthousiaste pour AppleWorks GS. 
Précisons : essayez donc de retrouver le 








vieil AppleWorks 8 bits version 1.0, et 
utilisez-le ! Il faut, pour le moins, du 
rodage à des applications de cette 
envergure. 

AppleWorks-GS vient donc de subir sa 
première révision, celle des 1000 km. Et, 
dé jà, les améliorations sont considérables. 
Le temps de chargement. d'abord : avec 
l'ExpressLoad du système 5.0, un 
fabricant de disques durs, par ailleurs 
excellents, se flatte de charger 
AppleWorks GS en 15 secondes. 

J'ai chronométré sur mon SCSI (un 
Seagatus vulgaris de gouttière, le plus 
ordinaire possible) : 15,5 secondes ! 
AppleWorks n'y est d’ailleurs pour rien, 
pas plus que le dur. C'est le système 5.0 
qui accélère à ce point-là. Sur disquette 
3,5", le gain est tout aussi phénoménal. 
Même chose d’ailleurs pour le gain de 
temps à l'impression, considérable aussi : 
c’est le système qui fait tout, même 
l'impression en justification totale sans 
erreurs, bravo Apple. 

(Et ne venez pas me parler d'accélérateur : 
mon GS, n’est pas accéléré par la 
Transwarp, c’est le vôtre qui est ralenti 
par son absence. De plus, pour les temps 
de chargement, la Transwarp agit peu). 

À part cela, quelques petites modifications 
dans la Base de données (un “contient”, un 
“commence par” et un “finit par” dans tes 
critères de recherche, ce qui évite les 
formules torturées nécessaires jusqu'ici, 
des cases toutes petites pour les 
mini-polices). Des modifications plus 
intéressantes dans le Paint : il accepte 
maintenant les images double-écran de GS 
Paint. 11 a des palettes spéciales pour 
importer les dessins GS Païnt et Deluxe 
Paint, comme avait déjà Multiscribe GS. 
Enfin, il inclut un programme de test des 
puces Ram, la crise ayant fait que nombre 
d'utilisateurs ont mis un peu n'importe 
quoi sur leurs cartes. 


Permettez-moi un dernier conseil aux 
utilisateurs : fermez les fenêtres. 1,2 
Mégas pour le 5.0 et AppleWorks GS, 
c'est déjà juste. Alors, pas de /RAMS, 
pas d'accessoires, bien sûr. AppleWorks 
est très libéral dans l’ouverture des 
fichiers, il empile joyeusement les 
fenêtres. Seulement, quand vous avez 
laissé ouvert un fichier Paint dont vous 
n'avez plus besoin, et que vous travaillez 
dans la PAO, AppleWorks GS garde en 
mémoire non seulement l’espace pour le 
fichier, mais aussi tout le module Paint. 
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Un jour, forcément, ça coince. Ïl faut 
choisir : acheter des puces, ou fermer les 
fenêtres. 


ÿ Trois infos 
en complément 


# l'adresse de Claris Usa a changé, 
voir dans la rubrique adresses ; 


# pour tous ceux qu'intéresse le débat 
absurde Mac ou GS, je recommande 
la lecture d’InCider de Juin (pages 54/55), 
InCider a eu l’idée de faire des tests 
précis : les mêmes travaux à faire avec 
Works sur Mac Plus et AppleWorks-GS 
1.02 sur GS, avec et sans Transwarp (par 
exemple, changer de police sur une page 
de texte, passer un texte entier de 10 en 
14 points sur la même police, remplacer 
un mot qui se répète dans un texte). Avec 
comme sans Transwarp, c'est insiructif.. 


“æ les lecteurs de Pom's n'ont pas les 

deux pieds dans le même sabot: l’un 
d’entre eux a envoyé à Claris USA une 
pétition qu'il a fait signer par ses amis 
demandant une version française 
d'Apple Works-GS. Claris a répondu, peli- 
ment, qu’il prenait note, et restait attentif 
aux demandes des utilisateurs. En ben 
français, cela signifie que plus Claris 
recevrace genre de letire.… 


w Plus de /RAMS 


Combien de fois ai-je entendu parler de 
plantages, de Finder qui ne marche pas, 
sur des GS pourtant à 1,2 Mégas de 
mémoire, avant de comprendre la raison 
exacte : /RAMS. Avec GS/OS et les 
applications d'aujourd'hui, pas de /RAM5 
si vous avez 1,2 Mégas de mémoire : 
c'est le minimum pour que ça tourne. 

/RAMS est utile dans deux cas : si vous 
avez plus d'1,2 Mégas, ou bien si vous 
avez démarré et si vous restez sous 
ProDOS 8 (je dis bien : avoir démarré, 
booté en P8 ; si vous lancez P8 depuis 
GS/OS, pas de /RAMS). /RAMS peut 
servir, par exemple, à partager la mémoire 
entre AppleWorks et un disque Ram, 
mais à condition de travailler sous P8. 

Ne rouspétez pas : le 5.0 est un 
magnifique système, mais il lui faut de la 
mémoire, forcément. Le prix de la Ram 
baisse, et vous pouvez aller jusqu'à 8 


Mégas, et un jour 16. Songez à ceux qui 
sont limités à 640Ko, ou même à 4 
Mégas… 


ÿ Orca/C 


L’angoisse me gagne, je l'avoue : avec ce 
qui se passe sur Mac et sur GS, avec 
APW C et, maintenant, Orca/C, de 
Byteworks (qui sort avant Orca Basic, 
notons-le), ne va-t-il pas falloir, nous 
aussi, nous mettre au C ? 


Oui, je sais : C, c'est Unix, ça sent la 
galère. Ça a une syntaxe arbitraire, bon. 
Maïs c’est un langage puissant, proche de 
l'assembleur en fait, et qui fait des 
applications portables, au moins entre 
Mac et GS. Et, dans le fond, il n’est pas 
plus arbitraire que ce bon vieil Applesoft. 
Et ce bon vieil Applesoft, il n'est pas 
éterne].., 

En plus, Orca/C a un mini-assembleur en 
ligne qui inclut son code directement dans 
le source C, marche sous Orca/Desktop. 
On m'a rapporté quelques bugs et 
incompatibilités avec APW/C, mais ça va 
passer. Imaginons un débutant qui ne 
connaisse aucun langage : que lui 
recommanderiez-vous ? Pas l'Applesoft, 
entoutcas. L'angoisse, je vous dis. 


 Gribouille : 
OK pour le dur 


Bon, désormais, avec le système 5.0 et 
Prose] 16 (mais seulement si vous les 
avez tous les deux), vous pouvez mettre 
Gribouille sur le dur, faire vos backups, 
vos défragmentations, etc. Avec le 5.0, 
Gribouille, qui est déjà rapide, devient 
instantané. 

Gribouille charge vite, imprime vite, 
travaille vite et bien. Et quand Madame 
Hodé en aura vendu assez, sûr qu'elle va 
songer au correcleur…. 

Peut-être seulement une autre suggestion 
aux “collégiens” : quand je vois la 
documentation de Gribouille, imprimée 
avec Gribouille bien sûr, je me sens tout 
petit, je n'utilise pas 10% de ses 
possibilités. Et quand je vois les 
contributions des collégiens, je suis 
encore plus petit, Alors, je songe que 
Gribouille SARL, avec ses beaux locaux 
tout neufs, pouiTait peut-être faire un peu 
de formation. 


130 pages de doc, aucune secrétaire ne lira 
ça toute seule. Il n'y a pas de honte à 
prendre des cours, encore moins à en 
donner ou à en vendre : il y a des 
enseignants qui en vivent (plutôt mal), 
après tout, et des entreprises qui 
s'engraissent (plutôt bien) avec la 
formation. 





à | 


A lire 





y” Infirmerie 


Prévenir vaut mieux que guérir, et cela 
coûte moins cher. Il est aussi bien 
pratique de guérir les petits bobos à la 
maison, et même de localiser les 
sympiômes exacts avant d'aller voir le 
médecin. 


C'est ce que vous pourrez faire avec le 
livre “Apple Care Manual : Diagno- 
sing and Maintaining your Apple 
Île, {ec and IIGS”, publié chez Tab 
Books par Chris Morrison et Teresa 
Stover. 

J'ai noté l'utilité des petits progranunes 
de diagnostic pour chaque partie de la 
machine, et la qualité des illustrations 
(essentielle dans un ouvrage de ce genre). 


 *B942 : 18 


La revue Computist, essentiellement 
consacrée à la déprotection des logiciels 
Apple //, a rencontré des difficultés ces 
derniers temps, pour une raison d’ailleurs 
fort réjouissante : comme il y a de moins 
en moins de protection dans les logiciels 
Apple //, même sur les jeux, parce 
qu'éditeurs et utilisateurs sont devenus 
adultes, la revue devenait peu-à-peu sans 
objet. 

Ne restaient plus guère à ‘‘cracker” que 
quelques logiciels éducatifs sur disquette 
5,25", qui ne sont “protégés” que pour 
empêcher les élèves de wicher, et quelques 
softs qu’il vaut mieux de toute façon 
jeter. *B942 : 18, à la longue, ça lasse. 
Dans une telle situation, Computist avait 
deux choix : le premier, c'était d'essayer 
d'étendre son rayon d'action à l'IBM. Ça 
n'a pas marché, parce que, même chez les 
galériens, on ne protège plus guère; et 
parce que ça lui a immédiatement coûté 
mon réabonnement. entre autres. 

Elle s'est donc tourné vers la seconde 
solution : d’une part, faire une revue 
moins chère, en sortant en fonnat journal. 
De l'autre, ne plus se limiter aux 
questions de déprotection, mais 
fonctionner comme carrefour global des 
informations entre utilisateurs d'Apple //. 
Et là, je me suis réabonné. 


 TechNotes 


J'ai déjà écrit que les notes techniques 
Apple //, rédigées par Apple, étaient une 
lecture indispensable. Pour vous les 
procurer, avec leurs mises à jour 
régulières, plutôt qu’à l’'APDA d'Apple, 
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demandez-les à A2 Central quilesmetsur 
ses disquettes mensuelles, ou à 
Ampersand : notre éminent confrère, qui 
confirme que “fanzine” n'est pas le 
contraire de “pro”, les diffuse également. 


” Help ! 


Où bien je suis particulièrement nul, ou 
bien ils ont tort de les vendre à part : en 
tout cas, je ne peux qu'exceptionnel- 
lement finir certains jeux sans les livrets 
d'aide (Hint Book, Clue Book, etc) 
vendus séparément par les éditeurs de 
logiciels de jeux. 

Pour L.A. Crackdown comme pour 
Subbattle, d'Epyx, le “Masters Col- 
lection Hint Book” vous donnera un 
bon coup de main. En plus, c’est bien 
pratique d'avoir les cartes toutes faites. 
Enfin, les interviewes des programmeurs 
sont fort instructives. 


” Midi Apple // 


Musiciens de toute compétence (du 
débutant au compositeur) et de tout 
équipement Midi, une revue mensuelle 
Apple // vous est spécialement dédiée : 
“Music, Midi, and Your Apple //” 
vous parlera mieux que moi d'Instant 
Synthé et de tout le resie. Aitemion, cette 
revue, diffusée par M\P Systems, 
n'est vendue que par abonnements. 
Rajoutez-y le dernier numéro du Buyer's 
Guide (pas encore mensuel, mais 
toujours aussi bon), qui contient de 
bonnes études sur le GS et la musique : 
dites, Messieurs les profs de musique, 
avez-vous sérieusement songé au GS, ou 
bien en êtes-vous toujours à j’harmo- 
nium ? 


Ææ Tant que j'y suis : MasterTracks Jr, 

de Passport Deslgns, a main- 
tenant un grand frère. Ji s’appelle bien sûr 
Master Tracks Sr, et, pour résumer, 
c'est la version GS de Master Tracks Pro 
du Mac. Mac/GS même combat... 
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P.O. Box 5100, Carrollton 

TX 75011, USA 

Applled Ingenuity 

14992 Ramona Boulevard, Unit M 
Baldwin Park, CA 91706, USA 
Beagle Bros 

6215 Ferris Square, Suite 100 

San Diego, C A 92121, USA 
Bréjoux 

29 Rue Montiibloud, 69009 Lyon 
æ 78 36 52 69 

Broderbund Software, Inc 

17 Paul Drive, San Rafael 

CA 94903, USA 

ByteWorks 

4700 Irving Boulevard NW, Suite 207 
Aïbuquerque, NM 87114, USA 
Central Point Software 
15220 NW Greenbrier Parkway, #200 
Beaverton, OR 97006, USA 
Cinemaware 

4165 Thousand Oaks Boulevard 
Westiake Village, CA 91362, USA 
Cirtech 

Curme Road Industrial Estate, Galashiels 
Selkirkshire, T D1 2BP 

Scotland, Royaume-Uni 

Clarls Usa 

(Attention : nouvelle adresse) 

5201 Patrick Henry Drive 

P.O. Box 58168, Santa Clara 

CA 95052-8168, USA 
Computist 

P.O. Box i10846-T, Tacoma 
WA98411, USA 

Crate Technology 

6850 Vineland Avenue, Building M 
North Hollywood, CA 91605, USA 
Discovery Software 

163 Conduit Street, Annapolis 
MD 21401, USA 

Electronic Arts 

Electronic Arts Direct Sales 

P.O. Box 7530, San Mateo 

CA 94403, USA 











Epyx 

600 Galveston Drive, Redwood City 
CA 94063, USA 

Glen Bredon 

S21 State Road, Princeton 

NJ 08540, USA 

Gribouille 

5 rue Humblot, 75015 Paris 

w (1) 40 59 49 77 

ICAR 

& 92 52 22 65 ou 92 52 30 34 à Gap 
Infocom 

125 Cambridge Park Drive 
Cambridge, MA 02140, USA 


MGA Microssstems 

PearTree, Appledore 

KENTTN?26 2AR, Angleterre 
50233-83571 

Mindscape 

3444 Dundee Road, Northbrook 

IL 60062, USA 

MMP Systems 

20681 Celesie Circle, Cupertino 

CA 95014, USA 

Musicomp Computer Zubehôr 
Urs Brunner, Botamingerstrasse 1 

CH 41-2 Bmningen, Suisse 

æ 061 47 0S 06 

Ohio Kache Systems 

4162 Little York Road, Suite E, Dayton 
Ohio 45414-2566, USA 

Pandasoft 

Uhlandstrasse 195, D-1000 Berline 12 
Passport Designs 

625 Miramentes Sireet, Half Moon Bay 
CA 94019, USA 

Roger Wagner Publishing 
1050 Pioneer Way, Suite P, El Cajon 
CA 92020, USA 

Sierra On Line 

5750 France Avenue South, Suite 123 
Edina, MN 55435, USA 

Tab Books 

P.0. Box 40, Blue Ridge Summit 
PA 17214, USA 


The Software Toolworks 

One Toolworks Plaza 

13557 Ventura Boulevard, Sherman Oak 
CA 91423, USA 

Toolbox 

35 Bld Richard Wallace, 92800 Puteaux 
w (1) 47 72 27 36 

Zip Technolegy 

11926 Santa Monica Boulevard 

Los Angeles, CA 90025, USA 


CG 














Pom’s Le Tarif 





* le numéro entre parenthèses indique la revue dans 
laquelle le produit est décrit. 











Revues 
n° 8äà n°26, chacune 
n° 27 à n° 43, chacune 


40,00 | 
45,00 | 
| 


Recueils Pom’s 


Ces recueils regroupent 4 numéros 
de la revue. (Recueil 5 à 8 épuisé) 


Recuells n° 1 à 4, 9 à 12, chacun 140,00 





Câbles communication 


Pour la miseen œuvre de ces câbles, 
se reporter aux numéros 27, 28, 30, 
31, 33 et 34 qui présentent les 
programmes de communication 
reliant ordinateur et Minitel. 
Préciser le ou les modèles 
d'ordinateur. 


Câble Minitel/ordinateur 
Câble Ordinateur/ordinateur 


225,00 
225,00 


Reliures 


Pour la protection et le classement 
de 6 numéros de Pom's (un an) 


Reliure 75,00 | 





Disquettes Pom's, Macintosh 


Ces disquettes regroupent 
l'ensemble des programmes pour 
Macintosh d'une revue. Pro- 
grammes du domaine public, 
polices de caractères, nouveaux 
systèmes, etc. y sont ajoutés. 


3,5”, de la n° 16 à la n° 43, chacune 





80,00 


Disquettes Pom's, Apple // 


Ces disquettes regroupent 
l'ensemble des programmes pour 

Apple // d'une revue. 

5,25" 140K0o, de la n° 1 à la n° 43, chacune 
3,5” 800K0o, de la n° 29 à la n° 43, chacune 


80,00 
80,00 


Logiciels pour Apple // 


Ces logiciels peuvent être livrés en 140 ou 
800K0 (préciser). Les logiciels américainssont 
accompagnés d'une documentation française. 


Tarif Joker& Tarif normal 


ChessMaster GS 800Ko (39) 630,00 700,00 
Arlequin 140Ko (39) 135,00 150,00 
Copy ]f+ version 8.3 (37) 450,00 500,00 
ProSel (36) 450,00 500,00 
Compilateur Beagle (35) 675,00 750,00 
Big U 140Ko (35) 400,00 450,00 
Pom_Link 3.1 (34/35) 400,00 450,00 
InterPom's 2.0 (31) 540,00 600,00 
Clv_Pom's (31) 180,00 200,00 
EPE 5.1 (15/23) 180,00 200,00 


Logiciels pour AppleWorks 


Ces logiciels se greffent sur AppleWorks pour 
le doter de la souris, de polices de caractères 
etc. * UltraMacros comprend l'ensemble des 
fonctions de SuperMacroWorks. 


Tarif Joker Tarif normal 


ExtraFonts (43) 450,00 500,00 
TimeOut PowerPack (41) 

TimeOut FlieMaster os 675,09 72000 
TimeOut SpreadTools (41) 495,00 550,00 
MacroTools (41) 270,00 300,00 
TimeOut DeskTools |! (41) 495,00 550,00 
TimeOut Palnt(39) 270,00 300,00 
TImeOut SuperFonts (38) 720,00 800,00 
TimeOut UltraMacros (38)* 585,00 650,00 
TimeOut Graph (38) 765,00 850,00 
TimeOut SideSpread (38) 495,00 550,00 
PathFinder (38) 135,00 150,00 
SuperMacroWorks (33) 450,00 500,00 
Polices de caractères 

Ces polices de caractères de type Macintosh 
fonctionnent avec AppleWorks & SuperFonts 

mais aussi avec Publish it!, MultiScribe. Une 

trentaine de polices par disquette 

‘Polices’ 001 à 018, 140 ou 800Ko, chacune 100,00 
Catalogue de référence Unipol 80,00 
Shareware Apple // 

Disquettes présentées dans lesnuméros38, 39, 

41,42 & 43. 

DPA 007 à 022, 140 ou 800K0, chacune 100,00 


Pôm'sn° 43 








Logiciel pour IBM PC 


* Accompagne le livre ‘Les Secrets de 
Multiplan’ de H. Thiriez 


Les Secrets de Multiplan* 175,00 
InterPom's 540,00 600,00 
ZipChip 


Nouveau processeur 4 Mhz pour les Apple / 
/e et //c. Description dans le numéro 39 de 

Pom's. 
Tarif Joker& Tarif normal 
2 250,00 
50,00 


ZipChip 4 Mhz 
Port (urgent recommandé) 


Logiciels pour Macintosh 
Tarif Joker Tarif normal 








Sargon 4 (40) 540,00 600,00 
Excel Efficace 175,00 
MacAstuces 200,00 
Le Livre du Macintosh 200,00 
Copy II Mac version 7.2 (37) 450,00 500,00 
Pom_Link 3.1 (34/35) 400,00 450,00 
Inter Pom's 2.0 (31) 540,00 600,00 | 
Civ_Pom's (31) 180,00 200,00 
Raccourci (26) 180,00 200,00 
Shareware Macintosh 

Disquettes présentées dans les numéros 22 & 

30. 

Mac A, B, C, D,E,F, G, H,1, chacune 100,00 


ADN (6 disquettes) 300,00 


Abonnements 1 an (6 numéros) 


L'abonnement à la revue Pom'’s comprend 
l'attribution automatique de la carte ‘Joker’. 
Celle-ci offre un accès privilégié à une 
assistance téléphonique et donne droit aux 
remises sur les produits Pom's. 








Revue seule 225,00 
Revue et disquettes Apple // 140Ko 625,00 
Revue et disquettes Apple // 800Ko 625,00 
Revue et disquettes Macintosh 625,00 
Revue et disquettes Apple // 140Ko et Mac 1 025,00 
Il 

Gagnez du temps. Commandez | 
par Minitel au : | 
(1) 39 53 04 40 | 








Porm's n° 43 


2 500,00 | 
50,00 | 





Bon de commande 


Je désire recevoir : 


Quant. Produit Prix total 











© 


J'ai un lecteur Apple // 140Ko 
J'ai un lecteur Apple // 800Ko 
Montant 


Port avion hors CEE 
15,00 F par revue et/ou disquette 





Q 





Montant total 








Ma commande atteint 500,00 F, je désire recevoir une 


| invitation Apple Expo 





oui / non 
Je règle Chèque 
par : Carte Bleue/Visa/Eurocard /Mastercard 
| NuMÉrO = NA NS LRU 
Expiration _ _/__ 
Signature 
Nom 
Prénom 
Adresse 


n° de carte Joker 


71 








Cent Ron 
le Lanr 


Co opy 7.1 


2 Macintosh 





- Le _Copie de sauvegarde de la Re ee 


des logiciels | 


Le Jo de la plupart des logiciels sur! 


_| disque dur | 


Ta Récupération de disques be 


| magés_ 


E  Réunéatda de fichiers effacés 


| même sur disque dur 


SE “Co Ile est Li à avec MacTools 


Copy II Mac 7.1, MacToo!ls, 
avec in française : 500,00 F TTC 
Abonnés (carte Joker): 450,00 FTIC 
Port : 20,00 F 


= MANCUELS EN FRANCAIS 


Pruflus/00S UTILIIES 
sil | 


° Utilitaire complet pour la gestion des. 


disques et fichiers DOS/ProDOS, # 
_ compris Conversion automatique | 


_e Utilisation de toute la mémoire dis-_ 


-E'exémple) |! | 
° Récupération de fichiers effacés 
+. Formatage de disques 


___" ponible (un 800Ko en une passe par: 


| 


Classement alphabétique des fichiers | 


aie de la plupart des 
_ logiciels. 
avec documentation française : 500,00 F TTC 


Abonnés (carte Joker) : 450,00 F TTC. : 
Port 20.00F::1 HET 








Éditions MEV/Pera’s— 12, rue d’Anjou:- 78000 Versailles -* 


(1) 39 51 24 43. Commande par Minitel au (1) 39 53 04.40 


Copy II Plus 8.3 sur disquette 525" 35% | | 






a  _._ | à as té 





&vy  CHESSMASTER 2100 


LE MAÏTRE 


PoM's vOUS PROPOSE 
AUJOURD'HUI SUR GS UNE 
EXTRAORDINAIRE VERSION 
DU MAITRE DES JEUX, 
CAPABLE DE 
PERFORMANCES 
D'EXCEPTION. 





NIVEAUX DE JEU AFFICHAGE 
LE SOMMET DE LA REFLEXION INFORMATIQUE : CHESSMASTER UTILISATION DES RESSOURCES DU GS : SUPER HAUTE 
2000 + L'EQUIVAIENT DE 10 ANNEES DE RECHERCHE RESOLUTION, MENUS DEROUTANTS, SOURIS... 
BIBLIOTHEQUE D'OUVERIURES CONSIDERABLE (PLUS DE 150000  PENDUIES TEMPS REEL A L'ECRAN 
coUPs) AFFICHAGE DE L'ECHIQUIER EN 2D ou 3D 
NOMBRE ILLIMITE DE (MVEAUX DE JEU, DE DEBUTANT A GRAND POSSIBILITE DE DESSINER SOI-MEME LES PIÈCES, DE TOURNER 
MAITRE L'ECHIQUIER PAR QUART DE TOUR, DE JOUER ‘A L'AVEUGIE" 
POUR CHAQUE NIVEAU, OPTION ‘JEU SIMPLIFIE’ AFFICHAGE FOSSIBLE DE VOS COMMENTAIRES SUR LES COUPS, 
EN MODE APPRENTISSAGE, CHESSMASTER 2100 INDIQUE LES DES PIECES DEJA PRISES, DE LA REFTEXON DE 
COUPS ET LES PRISES POSSIBLES CHESSMASIER 
TEMPS DE REFLEXION Pour PROGRESSER 
CHoïX DU TEMPS DE REFLEXON PAR COUP, PAR PARTIE, AFFICHAGE POSSIBLE DE LA REFLEXION DE CHESSMASIER 
EGALEMENT EN COUPS PAR MINUTE ET TEMPS STANDARDS  POSSIBIITE D'ANALYSE DES PARTIES 


DES TOURNOIS 110 PARTIES DE MAITRES ENREGISTREES AVEC COMMENTAIRES 
OPTION TEMPS EGAL, OPTION ‘BL:IZ’ ‘BE: 








DES AIDES 

CHESSMASTER 2100 PEUT SUGGERER UN COUP, REVENIR EN 
ARRIERE ET REJOUER LES COUPS 

POSSIBILITE DE CHANGER DE COTE À TOUS MOMENIS 





| 
| 
| 
SAUVEGARDE ET IMPRESSION DES PARTES 
RESOLUTION DE PROBLEMES D’ECHECS 
PARTIES A ‘AVANTAGES" 
MODE D'EMPLOI COMPLET POM’S, EN FRANCAIS, COMPRENANT 
UN MANUEL D'APPRENTISSAGE DE LA FEDERATION US 
D'ECHECS ET UN HISTORIQUE DES ECHECS PRESENTANT LES 
MAIRES 


DE PLus, VOTRE GS PARLE... 





Éditions MEV — 12, rue d'Aniou — 78000 Versailles © (1) 39 51 24 43 — Minitel (1) 39 53 04 40 














Vends Apple IIGS neuf 1 Mo, écran 
couleurs Apple, 1 lecteur 5,25", 1 
lecteur 3,5" 9 500,00 F — Modem 
Digitelec 800,00 F. 

Louis Lebras 

d, rue de Ligné 

37520 La Riche 

æ 47 39 08 81 


Vends pour //e Carte Chat Mauve 
64Ko 900,00 F — Carte CP/M Z80 
300,00 F. 

Michel Ducoin 

& 40 49 31 36 





Vends Apple //e avec carte AppleTel. 
carte parallèle, 2 lecteurs, 1 
imprimante, À joystick, moniteur 
monochrome. 

Ken Timsit 

æ 43 20 64 75 


Vends Apple IIGS 1,2 Mo couleurs, 
lecteur 5,25", lecteur 3,5" 6 000,00F. 
P. Foulhoux 

æ{(1) 42 53 04 81 après 19h 


Vends Apple IIGS couleurs 1256Ko, 
2 lecteurs 3,5", carte stéréo 8 000,00 
F — Carte AppleTel nouveau modèle 
2 000,00 F. Livraison possible. 
Philippe Gabeloux 


Montpellier 
& 67 47 11 23 


Vends Apple IIGS 1,28 Mo 
extensible à 1,5 Mo, 1 lecteurs 3,5", 
1 lecteur 5,25" 8 000,00 F 

Daniel 

æ (1) 45 83 79 66 





Vends Mac 128 Ko avec ImageWriter 
I, tous deux en excellent état, 
ensemble pour 5 000,00 F, ou 
4 000,00 F pour le Mac et 1 500,00 
F pour l'ImageWriter. 

Mme. Pieri 

æ (1) 60 19 10 00 


Vends Macintosh SE I méga HD20 
19 000,00 F. 

Olivier Dupont 

æ (1) 47 39 47 40 travail ou (1) 42 
74 73 07 après 20h. 





Horizontaiement 


1 - Baba 

2 - Mirent fin 

3 - Très rouge 

4 - Dégustation lente 


S - Vis - Nob, ailleurs - Tête de poète 


6 - Arabisa 

7 - Atome - Bière - Irrationnel 
8 - Communes 

S - issue - Haler 


LIAITIEIR AILIIISE) 
[IIRIOÏN|1]SIEfRIATS] 
Emi) 


[D] 

NE IEIRINIA IL fe fs 
[EITIETRINTILSIEINIT] 
[RIEILTITAIS BR oÏTIE) 


Th QU NP UoLN[oS 





10 - Peuvent donc se reproduire - Lieu d’errance 


Verticalement 


1 - Pardonnerions 

2 = Roi des Bretons - Lisière 

3 - I] paralyse - Sommaire 

4 - Ville d’URSS 

S - Fortifiante 

6 - Africain 

7 = Irlande - Politi- 
cienne étrangère 

8 - Demeurai - 
Remarque 

S - Entier - Attend 

10 - Accrochais 


Problème 43 
par 
Joëlle Piard 





Se d15 [6 07.8 


1 9 10 
RERRERNRRER 
EERRBRSENE 


Dame n° A? 








IL EST DANS LA MICRO-INFORMATIQUE 
APPLE DES NOMS MAGIQUES. GLEN 
BREDON EST DE CEUX-CI. ÎL EST DES 
PROGRAMMES QUI SIMPLIFIENT L'INFOR- 
MATIQUE, QUI OFFRENT SOUPLESSE ET 
LIBERTE. PROSEL EST DE CEUX-CI. 
| PRoSEL, PROGRAM SELECTOR, EST 
AVANT TOUT UN SELECTEUR D'APPLICA- 
TIONS, UNE FAÇON RATIONNELLE DE 
TRAVAILLER. ÎL OFFR E 





PROSEL EST AUSSI UN ENSEMBLE 
D'UTILITAIRES. — RECHERCHE DE 
FICHIERS DANS LES DOSSIERS — DUMP 
DE TOUS FICHIERS EN ASCII OU TEXTE — 
SUPPRESSION LOGIQUE DE VOLUMES 
PRODOS INUTILES A UNE APPLICATION 
— EXECUTION PROGRAMMEE 
D'APPLICATIONS AVEC MINUTAGE DES 
SEQUENCES DE TRAVAIL. — 
CONSTITUTION D'UNE MEMOIRE-CACHE SUR LES APPLE, PROSEL . 
— GESTION DES SAUVEGARDES ET 
RESTITUTIONS DE TOUT VOLUME 
ProDOS (DISQUES DURS SUR 
DISQUETIES) — PROGRAMME DE COPIE 
UNIVERSEL ET DE MANIPULATION DE 
FICHIERS Y COMPRIS RECUPERATION DE 
FICHIERS EFFACES — ANALYSE DE 
L'OCCUPATION DES DISQUES, ARBRE DE 
CATALOGUES, AFFECTATION DES BLOCS 
— REORGANISATION DES DISQUES — 
RECUPERATION DE DISQUES ABIMES — 
PROTECTION D'APFLICATIONS PAR MOT 
DE PASSE — FORMATEUR POUR LES 
DISQUETIES3,5 POUCES EN DOS 3.3 — 








LA LIBERTE EST ACCESSIBLE : 500,00 F y 
COMPRIS DOCUMENTATION FRANÇAISE, 
Port 20,00 F. TARIF CARTE JOKER : 
450,00 F — Epirions MEV /PoM's 
12, RUE D'ANJOU — 78000 VERSAILLES 
D : (1) 39 51 2443 - COMMANDE PAR 
MiniTEL AU : (1) 39 53 04 40 
Te a 
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JS 
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La quatrièm énérati 


Le célèbre programme 
d'échecs Sargon 4 est 
aujourd'hui doté del'un 
des algorithmes de 
réflexion les plus puis- 
sants. 


145 000 coups 
d'ouverture 


Il offre une biblio- 
thèque d'ouvertures de 
145 000 coups qui lui 
permet d'économiserun 
temps précieux en 
début de partie. 


Sargon 4 joue fort bien 
et est à même de 
s'adapter à tous les ni- 
veaux. 





À la portée 
du débutant 


Sargon 4 pense aux 
novices : 

Le livret explicatif 
donne les bases 
nécessaires. Un niveau 
de jeu spécial ‘débutant’ 
est prévu. 


e En > 
FAN AP AVATAR AT TATETS CET 


Fr, 


Il est en outre possible de re- 
venir en arrière, de changer 
de camp, de modifier les po- 
sitions... et même de suivre 
la réflexion de Sargon. 








Affichage 3D 


Sargon 4 présente la table 
d'échecs en deux ou trois di- 
mensions (perspective) avec 
cinq jeux de pièces. 


Sur Macintosh II, l'affichage 
est en couleurs, rendant 


ainsi l'échiquier encore plus 
lisible. 


Des pièces éditables 


Vous dessinerez vous-même 
vos pièces pour l'affichage en 
perspective. Vous pourrez 
aussi modifier les formes et 
couleurs des jeux de pièces 
proposés. 


Sargon 4 sait rejouer toute 
une partie en analysant 
chaque coup; cette méthode 
d'apprentissage est incompa- 









rable. Et, pour aller plus loin, vous étudierez 
les 107 parties célèbres que Sargon vous 
propose. 


Et de plus... 

Sauvegarde, impression des parties 
Pendules d'échecs à l'écran 

Affichage des coups joués 

Changement du sens de l'échiquier 
Recherche de mats 

Temps de réflexion de 5 secondes à l'infini 
Parties à temps limité 

Possibilité de proposer le nul... 


Sargon 4 fonctionne sur Macintosh 512 avec 
lecteur 800K0o, Mac Plus, Mac SE et Mac Il. 


Guide d'apprentissage et 
mode d'emploi complets 
Traduction intégrale 





Éditions MEV Revue Pom's 
12, rue d'Anjou — 78000 Versailles 
& (1) 39 51 24 43 - Minitel (1) 39 53 04 40 


Essai dans le numéro 40 de Pom's 
Bon de commande en fin de ce numéro 


